home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1995-05-20 | 155.4 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 13 ee 85 f6 3a | f1 22 20 61 74 20 22 3b |.......:|." at ";|
|00000010| 9e 3a e0 0d 00 14 09 f2 | 69 6e 69 74 0d 00 1e 0d |.:......|init....|
|00000020| f2 69 6e 69 74 5f 74 63 | 70 0d 00 28 11 e7 a4 64 |.init_tc|p..(...d|
|00000030| 75 70 74 61 73 6b 3e 30 | 8c e0 0d 00 32 0f f2 63 |uptask>0|....2..c|
|00000040| 72 65 61 74 65 64 69 72 | 73 0d 00 3c 0d f2 6c 6f |reatedir|s..<..lo|
|00000050| 61 64 63 6f 64 65 0d 00 | 46 12 f2 73 74 61 72 74 |adcode..|F..start|
|00000060| 6d 73 67 74 72 61 6e 73 | 0d 00 50 0d f2 69 6e 69 |msgtrans|..P..ini|
|00000070| 74 5f 74 63 70 0d 00 5a | 0e f2 73 74 61 72 74 77 |t_tcp..Z|..startw|
|00000080| 69 6d 70 0d 00 64 4a f4 | 20 63 6c 61 69 6d 20 61 |imp..dJ.| claim a|
|00000090| 6c 6c 20 66 72 65 65 20 | 6d 65 6d 6f 72 79 2c 20 |ll free |memory, |
|000000a0| 62 61 72 20 36 34 6b 2c | 20 75 70 20 74 6f 20 61 |bar 64k,| up to a|
|000000b0| 20 6d 61 78 69 6d 75 6d | 20 6f 66 20 33 32 30 6b | maximum| of 320k|
|000000c0| 20 28 66 72 65 65 20 73 | 70 61 63 65 29 0d 00 6e | (free s|pace)..n|
|000000d0| 15 e0 3d 93 2b a4 66 72 | 65 65 6d 65 6d 28 2d 36 |..=.+.fr|eemem(-6|
|000000e0| 34 29 0d 00 78 20 e7 28 | 93 2d e0 29 3e 33 32 30 |4)..x .(|.-.)>320|
|000000f0| 2a 31 30 32 34 8c e0 3d | e0 2b 33 32 30 2a 31 30 |*1024..=|.+320*10|
|00000100| 32 34 0d 00 82 10 f2 6c | 6f 61 64 73 79 73 63 6f |24.....l|oadsysco|
|00000110| 6e 66 0d 00 8c 11 f2 63 | 68 65 63 6b 6e 65 77 73 |nf.....c|hecknews|
|00000120| 64 69 72 0d 00 96 12 f2 | 67 65 74 74 72 61 6e 73 |dir.....|gettrans|
|00000130| 70 6f 72 74 73 0d 00 a0 | 10 f2 6c 6f 63 6b 6e 65 |ports...|..lockne|
|00000140| 77 73 64 69 72 0d 00 aa | 15 f2 72 65 61 64 67 72 |wsdir...|..readgr|
|00000150| 6f 75 70 64 61 74 61 28 | 31 29 0d 00 b4 10 f2 69 |oupdata(|1).....i|
|00000160| 6e 69 74 66 69 6c 74 65 | 72 73 0d 00 be 0f e0 3d |nitfilte|rs.....=|
|00000170| 28 e0 2b 26 34 30 30 30 | 29 0d 00 c8 0f f2 72 65 |(.+&4000|).....re|
|00000180| 61 64 63 6f 6e 66 69 67 | 0d 00 d2 11 f2 72 65 61 |adconfig|.....rea|
|00000190| 64 75 73 65 72 64 61 74 | 61 0d 00 dc 14 f2 73 74 |duserdat|a.....st|
|000001a0| 61 72 74 74 72 61 6e 73 | 70 6f 72 74 73 0d 00 e6 |arttrans|ports...|
|000001b0| 12 f2 61 75 74 6f 63 6f | 6e 66 69 67 75 72 65 0d |..autoco|nfigure.|
|000001c0| 00 f0 1a e3 6c 31 25 3d | 31 b8 33 3a f2 70 6f 6c |....l1%=|1.3:.pol|
|000001d0| 6c 28 30 29 3a ed 6c 31 | 25 0d 00 fa 0f e0 3d 28 |l(0):.l1|%.....=(|
|000001e0| e0 2b 26 34 30 30 30 29 | 0d 01 04 22 73 74 61 72 |.+&4000)|..."star|
|000001f0| 74 75 70 6f 6b 25 3d 31 | 3a f2 6e 62 73 74 61 72 |tupok%=1|:.nbstar|
|00000200| 74 75 70 28 30 2c 30 2c | 30 29 0d 01 0e 12 f2 63 |tup(0,0,|0).....c|
|00000210| 68 65 63 6b 6f 75 74 66 | 69 6c 65 73 0d 01 18 18 |heckoutf|iles....|
|00000220| f2 69 6e 69 74 63 6f 6e | 66 28 69 6e 69 74 63 6f |.initcon|f(initco|
|00000230| 6e 66 25 29 0d 01 22 12 | e0 3d 93 2b a4 63 68 65 |nf%)..".|.=.+.che|
|00000240| 63 6b 73 6c 6f 74 0d 01 | 2c 18 e7 6e 6e 74 70 25 |ckslot..|,..nntp%|
|00000250| 8c f2 73 74 61 72 74 5f | 74 63 70 28 b9 29 0d 01 |..start_|tcp(.)..|
|00000260| 36 12 ee 85 f2 65 72 72 | 6f 72 62 6f 78 28 b9 29 |6....err|orbox(.)|
|00000270| 0d 01 40 17 f2 73 74 61 | 72 74 75 70 63 68 65 63 |..@..sta|rtupchec|
|00000280| 6b 65 78 70 69 72 65 0d | 01 4a 05 f5 0d 01 54 13 |kexpire.|.J....T.|
|00000290| 20 20 e7 63 68 65 63 6b | 66 69 6c 65 73 25 8c 0d | .check|files%..|
|000002a0| 01 5e 09 20 20 20 20 f5 | 0d 01 68 1b 20 20 20 20 |.^. .|..h. |
|000002b0| 20 20 73 74 61 72 74 25 | 3d 30 3a 66 69 72 73 74 | start%|=0:first|
|000002c0| 25 3d b9 0d 01 72 2d 20 | 20 20 20 20 20 66 69 6c |%=...r- | fil|
|000002d0| 65 24 3d a4 63 68 65 63 | 6b 66 6f 72 66 69 6c 65 |e$=.chec|kforfile|
|000002e0| 73 28 73 74 61 72 74 25 | 2c 66 69 72 73 74 25 29 |s(start%|,first%)|
|000002f0| 0d 01 7c 18 20 20 20 20 | 20 20 e0 3d 93 2b a4 63 |..|. | .=.+.c|
|00000300| 68 65 63 6b 73 6c 6f 74 | 0d 01 86 35 20 20 20 20 |heckslot|...5 |
|00000310| 20 20 e7 66 69 6c 65 24 | 3e 22 22 8c f2 63 68 65 | .file$|>""..che|
|00000320| 63 6b 64 69 73 6b 3a f2 | 64 6f 62 61 74 63 68 28 |ckdisk:.|dobatch(|
|00000330| 66 69 6c 65 24 2c 73 74 | 61 72 74 25 29 0d 01 90 |file$,st|art%)...|
|00000340| 11 20 20 20 20 fd 66 69 | 6c 65 24 3d 22 22 0d 01 |. .fi|le$=""..|
|00000350| 9a 20 20 20 20 20 63 68 | 65 63 6b 66 69 6c 65 73 |. ch|eckfiles|
|00000360| 25 3d 61 75 74 6f 64 65 | 62 61 74 63 68 25 0d 01 |%=autode|batch%..|
|00000370| a4 07 20 20 cd 0d 01 ae | 0c 20 20 f2 73 6c 65 65 |.. ....|. .slee|
|00000380| 70 0d 01 b8 06 fd 30 0d | 01 c2 05 e0 0d 01 cc 04 |p.....0.|........|
|00000390| 0d 01 d6 12 dd f2 69 6e | 69 74 63 6f 6e 66 28 69 |......in|itconf(i|
|000003a0| 25 29 0d 01 e0 0e e7 69 | 25 3e 30 80 72 77 25 8c |%).....i|%>0.rw%.|
|000003b0| 0d 01 ea 21 20 20 e7 69 | 25 3d 32 8c f2 6d 65 73 |...! .i|%=2..mes|
|000003c0| 73 61 67 65 30 28 22 53 | 69 6e 66 6f 32 22 2c 31 |sage0("S|info2",1|
|000003d0| 29 0d 01 f4 41 20 20 f2 | 66 72 6f 6e 74 28 6d 73 |)...A .|front(ms|
|000003e0| 65 74 75 70 25 29 3a f2 | 70 72 69 6e 74 28 a4 6d |etup%):.|print(.m|
|000003f0| 73 67 30 28 22 53 65 74 | 75 70 22 29 2c a4 6d 73 |sg0("Set|up"),.ms|
|00000400| 67 30 28 22 53 77 61 69 | 74 22 29 2c 22 22 2c 22 |g0("Swai|t"),"","|
|00000410| 22 29 0d 01 fe 35 20 20 | f5 3a f2 70 6f 6c 6c 28 |")...5 |.:.poll(|
|00000420| 35 30 29 3a fd a4 77 69 | 6e 64 6f 77 6f 70 65 6e |50):..wi|ndowopen|
|00000430| 28 6d 73 65 74 75 70 25 | 29 3d 30 3a f2 73 61 76 |(msetup%|)=0:.sav|
|00000440| 65 63 6f 6e 66 69 67 0d | 02 08 05 cd 0d 02 12 05 |econfig.|........|
|00000450| e1 0d 02 1c 04 0d 02 26 | 0a dd f2 63 72 6f 6e 0d |.......&|...cron.|
|00000460| 02 30 16 e7 74 69 6d 65 | 25 2d 63 72 6f 6e 25 28 |.0..time|%-cron%(|
|00000470| 30 29 3e 30 8c 0d 02 3a | 0c 20 20 f2 63 72 6f 6e |0)>0...:|. .cron|
|00000480| 30 0d 02 44 23 20 20 e7 | 73 74 61 72 74 75 70 6f |0..D# .|startupo|
|00000490| 6b 25 80 74 69 6d 65 25 | 2d 63 72 6f 6e 25 28 31 |k%.time%|-cron%(1|
|000004a0| 29 3e 30 8c 0d 02 4e 0e | 20 20 20 20 f2 63 72 6f |)>0...N.| .cro|
|000004b0| 6e 31 0d 02 58 1a 20 20 | 20 20 e7 74 69 6d 65 25 |n1..X. | .time%|
|000004c0| 2d 63 72 6f 6e 25 28 32 | 29 3e 30 8c 0d 02 62 10 |-cron%(2|)>0...b.|
|000004d0| 20 20 20 20 20 20 f2 63 | 72 6f 6e 32 0d 02 6c 1c | .c|ron2..l.|
|000004e0| 20 20 20 20 20 20 e7 74 | 69 6d 65 25 2d 63 72 6f | .t|ime%-cro|
|000004f0| 6e 25 28 33 29 3e 30 8c | 0d 02 76 12 20 20 20 20 |n%(3)>0.|..v. |
|00000500| 20 20 20 20 f2 63 72 6f | 6e 33 0d 02 80 0b 20 20 | .cro|n3.... |
|00000510| 20 20 20 20 cd 0d 02 8a | 09 20 20 20 20 cd 0d 02 | ....|. ...|
|00000520| 94 07 20 20 cd 0d 02 9e | 05 cd 0d 02 a8 05 e1 0d |.. ....|........|
|00000530| 02 b2 04 0d 02 bc 0b dd | f2 63 72 6f 6e 30 0d 02 |........|.cron0..|
|00000540| c6 16 63 72 6f 6e 25 28 | 30 29 3d 74 69 6d 65 25 |..cron%(|0)=time%|
|00000550| 2b 33 30 30 0d 02 d0 17 | e7 69 6e 66 6f 6f 70 65 |+300....|.infoope|
|00000560| 6e 25 8c f2 63 72 65 64 | 69 74 73 0d 02 da 05 e1 |n%..cred|its.....|
|00000570| 0d 02 e4 04 0d 02 ee 0b | dd f2 63 72 6f 6e 31 0d |........|..cron1.|
|00000580| 02 f8 17 63 72 6f 6e 25 | 28 31 29 3d 74 69 6d 65 |...cron%|(1)=time|
|00000590| 25 2b 33 30 30 30 0d 03 | 02 1f f2 63 68 65 63 6b |%+3000..|...check|
|000005a0| 6f 75 74 66 69 6c 65 73 | 3a f2 63 68 65 63 6b 74 |outfiles|:.checkt|
|000005b0| 6f 73 65 6e 64 0d 03 0c | 05 e1 0d 03 16 04 0d 03 |osend...|........|
|000005c0| 20 0b dd f2 63 72 6f 6e | 32 0d 03 2a 17 63 72 6f | ...cron|2..*.cro|
|000005d0| 6e 25 28 32 29 3d 74 69 | 6d 65 25 2b 36 30 30 30 |n%(2)=ti|me%+6000|
|000005e0| 0d 03 34 12 65 76 61 64 | 65 5f 65 72 72 6f 72 25 |..4.evad|e_error%|
|000005f0| 3d b9 0d 03 3e 25 f2 63 | 68 65 63 6b 6c 6f 63 6b |=...>%.c|hecklock|
|00000600| 3a f2 77 72 69 74 65 69 | 6e 64 65 78 65 73 3a f2 |:.writei|ndexes:.|
|00000610| 6c 6f 67 28 22 22 29 0d | 03 48 05 e1 0d 03 52 04 |log("").|.H....R.|
|00000620| 0d 03 5c 0b dd f2 63 72 | 6f 6e 33 0d 03 66 18 63 |..\...cr|on3..f.c|
|00000630| 72 6f 6e 25 28 33 29 3d | 74 69 6d 65 25 2b 33 30 |ron%(3)=|time%+30|
|00000640| 30 30 30 0d 03 70 20 e7 | 62 6c 6f 63 6b 65 78 70 |000..p .|blockexp|
|00000650| 69 72 65 25 3d 30 8c f2 | 63 68 65 63 6b 65 78 70 |ire%=0..|checkexp|
|00000660| 69 72 65 0d 03 7a 1f e7 | 70 6f 73 74 66 65 74 63 |ire..z..|postfetc|
|00000670| 68 72 65 61 64 79 25 8c | f2 70 6f 73 74 66 65 74 |hready%.|.postfet|
|00000680| 63 68 0d 03 84 19 e7 67 | 64 61 74 61 25 8c f2 77 |ch.....g|data%..w|
|00000690| 72 69 74 65 67 72 70 64 | 61 74 61 0d 03 8e 20 e7 |ritegrpd|ata... .|
|000006a0| 74 7a 6c 6f 63 6b 25 8c | 74 69 6d 65 7a 6f 6e 65 |tzlock%.|timezone|
|000006b0| 24 3d a4 74 69 6d 65 7a | 6f 6e 65 0d 03 98 05 e1 |$=.timez|one.....|
|000006c0| 0d 03 a2 04 0d 03 ac 0b | dd f2 73 6c 65 65 70 0d |........|..sleep.|
|000006d0| 03 b6 1c ea 6d 24 2c 64 | 65 6c 61 79 25 2c 74 31 |....m$,d|elay%,t1|
|000006e0| 25 2c 65 6e 64 73 6c 65 | 65 70 25 0d 03 c0 1d 6d |%,endsle|ep%....m|
|000006f0| 24 3d 22 49 64 6c 65 32 | 22 3a e7 72 77 25 8c 6d |$="Idle2|":.rw%.m|
|00000700| 24 3d 22 49 64 6c 65 22 | 0d 03 ca 21 f2 70 72 69 |$="Idle"|...!.pri|
|00000710| 6e 74 28 a4 6d 73 67 30 | 28 6d 24 29 2c 22 20 22 |nt(.msg0|(m$)," "|
|00000720| 2c 22 20 22 2c 22 20 22 | 29 0d 03 d4 2d 65 6e 64 |," "," "|)...-end|
|00000730| 73 6c 65 65 70 25 3d 74 | 69 6d 65 25 2b 63 68 6b |sleep%=t|ime%+chk|
|00000740| 74 69 6d 65 25 3a 64 65 | 6c 61 79 25 3d 63 68 6b |time%:de|lay%=chk|
|00000750| 74 69 6d 65 25 3a 0d 03 | de 05 f5 0d 03 e8 11 20 |time%:..|....... |
|00000760| 20 e7 69 6e 66 6f 6f 70 | 65 6e 25 8c 0d 03 f2 12 | .infoop|en%.....|
|00000770| 20 20 20 20 64 65 6c 61 | 79 25 3d 31 30 30 0d 03 | dela|y%=100..|
|00000780| fc 09 20 20 20 20 cc 0d | 04 06 37 20 20 20 20 74 |.. ..|..7 t|
|00000790| 31 25 3d 94 28 74 69 6d | 65 25 2d 63 72 6f 6e 25 |1%=.(tim|e%-cron%|
|000007a0| 28 30 29 29 3a e7 74 31 | 25 3c 64 65 6c 61 79 25 |(0)):.t1|%<delay%|
|000007b0| 8c 64 65 6c 61 79 25 3d | 74 31 25 2b 31 30 0d 04 |.delay%=|t1%+10..|
|000007c0| 10 3c 20 20 20 20 e7 64 | 65 6c 61 79 25 3e 94 28 |.< .d|elay%>.(|
|000007d0| 74 69 6d 65 25 2d 65 6e | 64 73 6c 65 65 70 25 29 |time%-en|dsleep%)|
|000007e0| 8c 64 65 6c 61 79 25 3d | 94 28 74 69 6d 65 25 2d |.delay%=|.(time%-|
|000007f0| 65 6e 64 73 6c 65 65 70 | 25 29 0d 04 1a 07 20 20 |endsleep|%).... |
|00000800| cd 0d 04 24 13 20 20 f2 | 70 6f 6c 6c 28 64 65 6c |...$. .|poll(del|
|00000810| 61 79 25 29 0d 04 2e 21 | fd 66 6f 72 63 65 62 61 |ay%)...!|.forceba|
|00000820| 74 63 68 25 84 74 69 6d | 65 25 3e 3d 65 6e 64 73 |tch%.tim|e%>=ends|
|00000830| 6c 65 65 70 25 0d 04 38 | 11 66 6f 72 63 65 62 61 |leep%..8|.forceba|
|00000840| 74 63 68 25 3d 30 0d 04 | 42 05 e1 0d 04 4c 04 0d |tch%=0..|B....L..|
|00000850| 04 56 12 dd f2 63 68 65 | 63 6b 6e 65 77 73 64 69 |.V...che|cknewsdi|
|00000860| 72 0d 04 60 12 c8 95 6e | 65 77 73 72 6f 6f 74 24 |r..`...n|ewsroot$|
|00000870| 3d 22 22 0d 04 6a 3c 20 | 20 e7 72 77 25 8c f2 6d |=""..j< | .rw%..m|
|00000880| 65 73 73 61 67 65 30 28 | 22 53 6e 65 77 73 64 69 |essage0(|"Snewsdi|
|00000890| 72 22 2c 31 29 8b f2 6d | 65 73 73 61 67 65 30 28 |r",1)..m|essage0(|
|000008a0| 22 53 72 6f 6e 65 77 73 | 64 69 72 22 2c 31 29 0d |"Sronews|dir",1).|
|000008b0| 04 74 37 20 20 f2 63 72 | 65 61 74 65 64 69 72 73 |.t7 .cr|eatedirs|
|000008c0| 3a e7 6e 65 77 73 72 6f | 6f 74 24 3d 22 22 80 72 |:.newsro|ot$="".r|
|000008d0| 77 25 f2 63 66 72 6f 6e | 74 28 73 61 76 65 6e 64 |w%.cfron|t(savend|
|000008e0| 25 2c 30 2c 30 29 0d 04 | 7e 35 20 20 f5 f2 70 6f |%,0,0)..|~5 ..po|
|000008f0| 6c 6c 28 32 30 30 29 3a | fd a4 77 69 6e 64 6f 77 |ll(200):|..window|
|00000900| 6f 70 65 6e 28 73 61 76 | 65 6e 64 25 29 3d 30 3a |open(sav|end%)=0:|
|00000910| f2 63 72 65 61 74 65 64 | 69 72 73 0d 04 88 05 ce |.created|irs.....|
|00000920| 0d 04 92 27 e7 bb a4 76 | 61 72 76 61 6c 28 22 4e |...'...v|arval("N|
|00000930| 65 77 73 44 69 72 24 56 | 65 72 73 69 6f 6e 22 29 |ewsDir$V|ersion")|
|00000940| 3c 31 80 72 77 25 8c 0d | 04 9c 25 20 20 f2 6d 65 |<1.rw%..|..% .me|
|00000950| 73 73 61 67 65 30 28 22 | 53 75 70 64 61 74 65 22 |ssage0("|Supdate"|
|00000960| 2c 30 29 3a f2 70 6f 6c | 6c 28 30 29 0d 04 a6 32 |,0):.pol|l(0)...2|
|00000970| 20 20 f2 6d 61 6b 65 6e | 65 77 73 64 69 72 28 22 | .maken|ewsdir("|
|00000980| 3c 4e 65 77 73 44 69 72 | 24 44 69 72 3e 22 29 3a |<NewsDir|$Dir>"):|
|00000990| f2 6d 65 73 73 61 67 65 | 28 22 22 2c 30 29 0d 04 |.message|("",0)..|
|000009a0| b0 05 cd 0d 04 ba 05 e1 | 0d 04 c4 04 0d 04 ce 26 |........|.......&|
|000009b0| dd a4 63 68 65 63 6b 66 | 6f 72 66 69 6c 65 73 28 |..checkf|orfiles(|
|000009c0| f8 20 73 74 61 72 74 25 | 2c f8 20 66 69 72 73 74 |. start%|,. first|
|000009d0| 25 29 0d 04 d8 1f ea 74 | 31 25 2c 6c 25 2c 66 24 |%).....t|1%,l%,f$|
|000009e0| 2c 70 61 74 24 2c 64 74 | 79 25 2c 63 74 69 6d 65 |,pat$,dt|y%,ctime|
|000009f0| 25 0d 04 e2 1d e7 72 77 | 25 80 a4 66 72 65 65 6d |%.....rw|%..freem|
|00000a00| 65 6d 28 30 29 3e 33 32 | 2a 31 30 32 34 8c 0d 04 |em(0)>32|*1024...|
|00000a10| ec 1b 20 20 f2 73 65 74 | 74 69 6d 65 3a 63 74 69 |.. .set|time:cti|
|00000a20| 6d 65 25 3d 74 69 6d 65 | 25 0d 04 f6 33 20 20 f2 |me%=time|%...3 .|
|00000a30| 70 72 69 6e 74 28 a4 6d | 73 67 30 28 22 49 64 6c |print(.m|sg0("Idl|
|00000a40| 65 22 29 2c a4 6d 73 67 | 30 28 22 46 63 68 65 63 |e"),.msg|0("Fchec|
|00000a50| 6b 22 29 2c 22 20 22 2c | 22 20 22 29 0d 05 00 2a |k")," ",|" ")...*|
|00000a60| 20 20 f4 20 66 69 72 73 | 74 20 63 68 65 63 6b 20 | . firs|t check |
|00000a70| 66 6f 72 20 72 65 63 6f | 76 65 72 79 20 72 65 63 |for reco|very rec|
|00000a80| 6f 72 64 2e 2e 2e 0d 05 | 0a 1f 20 20 66 24 3d a4 |ord.....|.. f$=.|
|00000a90| 63 68 65 63 6b 5f 72 65 | 63 66 69 6c 65 28 73 74 |check_re|cfile(st|
|00000aa0| 61 72 74 25 29 0d 05 14 | 0d 20 20 e7 66 24 3d 22 |art%)...|. .f$="|
|00000ab0| 22 8c 0d 05 1e 16 20 20 | 20 20 73 74 61 72 74 25 |"..... | start%|
|00000ac0| 3d 30 3a 74 31 25 3d 30 | 0d 05 28 09 20 20 20 20 |=0:t1%=0|..(. |
|00000ad0| f5 0d 05 32 30 20 20 20 | 20 20 20 e7 74 31 25 3d |...20 | .t1%=|
|00000ae0| 30 84 74 72 61 6e 73 69 | 6e 25 28 74 31 25 29 3e |0.transi|n%(t1%)>|
|00000af0| 30 84 74 31 25 3d 64 65 | 66 73 6f 75 72 63 65 25 |0.t1%=de|fsource%|
|00000b00| 8c 0d 05 3c 42 20 20 20 | 20 20 20 20 20 e7 66 69 |...<B | .fi|
|00000b10| 72 73 74 25 8c 6c 25 3d | a4 72 75 6e 74 72 61 6e |rst%.l%=|.runtran|
|00000b20| 73 70 6f 72 74 66 69 6c | 65 28 74 31 25 2c 31 33 |sportfil|e(t1%,13|
|00000b30| 2c 22 22 2c 22 22 2c 22 | 22 29 3a 66 69 72 73 74 |,"","","|"):first|
|00000b40| 25 3d 30 0d 05 46 12 20 | 20 20 20 20 20 20 20 6c |%=0..F. | l|
|00000b50| 25 3d 30 3a f5 0d 05 50 | 37 20 20 20 20 20 20 20 |%=0:...P|7 |
|00000b60| 20 20 20 70 61 74 24 3d | 74 72 61 6e 73 69 24 28 | pat$=|transi$(|
|00000b70| 74 31 25 2c 6c 25 29 3a | 64 74 79 25 3d 74 72 61 |t1%,l%):|dty%=tra|
|00000b80| 6e 73 69 25 28 74 31 25 | 2c 6c 25 29 0d 05 5a 4f |nsi%(t1%|,l%)..ZO|
|00000b90| 20 20 20 20 20 20 20 20 | 20 20 e7 70 61 74 24 3e | | .pat$>|
|00000ba0| 22 22 80 28 64 74 79 25 | 3d 30 84 28 63 68 65 63 |"".(dty%|=0.(chec|
|00000bb0| 6b 66 69 6c 65 73 25 80 | 64 74 79 25 29 3e 30 29 |kfiles%.|dty%)>0)|
|00000bc0| 8c 66 24 3d a4 63 68 65 | 63 6b 69 6e 66 69 6c 65 |.f$=.che|ckinfile|
|00000bd0| 73 28 74 31 25 2c 70 61 | 74 24 29 0d 05 64 23 20 |s(t1%,pa|t$)..d# |
|00000be0| 20 20 20 20 20 20 20 20 | 20 6c 25 2b 3d 31 3a f2 | | l%+=1:.|
|00000bf0| 70 6f 6c 6c 28 73 6c 69 | 63 65 25 2a 35 29 0d 05 |poll(sli|ce%*5)..|
|00000c00| 6e 20 20 20 20 20 20 20 | 20 20 fd 66 24 3e 22 22 |n | .f$>""|
|00000c10| 84 70 61 74 24 3d 22 22 | 84 6c 25 3d 31 30 0d 05 |.pat$=""|.l%=10..|
|00000c20| 78 0b 20 20 20 20 20 20 | cd 0d 05 82 10 20 20 20 |x. |..... |
|00000c30| 20 20 20 74 31 25 2b 3d | 31 0d 05 8c 1c 20 20 20 | t1%+=|1.... |
|00000c40| 20 fd 66 24 3e 22 22 84 | 74 31 25 3e 6d 61 78 74 | .f$>"".|t1%>maxt|
|00000c50| 72 61 6e 73 25 0d 05 96 | 0f 20 20 20 20 e7 66 24 |rans%...|. .f$|
|00000c60| 3d 22 22 8c 0d 05 a0 3d | 20 20 20 20 20 20 f2 73 |=""....=| .s|
|00000c70| 65 74 74 69 6d 65 3a 63 | 68 6b 74 69 6d 65 25 3d |ettime:c|hktime%=|
|00000c80| 28 63 68 6b 74 69 6d 65 | 25 81 32 29 2b 28 31 35 |(chktime|%.2)+(15|
|00000c90| 2a 94 28 74 69 6d 65 25 | 2d 63 74 69 6d 65 25 29 |*.(time%|-ctime%)|
|00000ca0| 29 0d 05 aa 26 20 20 20 | 20 20 20 e7 63 68 6b 74 |)...& | .chkt|
|00000cb0| 69 6d 65 25 3e 39 30 30 | 30 8c 63 68 6b 74 69 6d |ime%>900|0.chktim|
|00000cc0| 65 25 3d 39 30 30 30 0d | 05 b4 2c 20 20 20 20 20 |e%=9000.|.., |
|00000cd0| 20 e7 64 65 62 74 69 6d | 65 25 3e 30 8c 63 68 6b | .debtim|e%>0.chk|
|00000ce0| 74 69 6d 65 25 3d 64 65 | 62 74 69 6d 65 25 2a 36 |time%=de|btime%*6|
|00000cf0| 30 30 30 0d 05 be 09 20 | 20 20 20 cd 0d 05 c8 07 |000.... | .....|
|00000d00| 20 20 cd 0d 05 d2 05 cd | 0d 05 dc 07 3d 66 24 0d | ......|....=f$.|
|00000d10| 05 e6 04 0d 05 f0 18 dd | f2 73 74 61 72 74 75 70 |........|.startup|
|00000d20| 63 68 65 63 6b 65 78 70 | 69 72 65 0d 05 fa 1d e7 |checkexp|ire.....|
|00000d30| a4 63 68 65 63 6b 65 78 | 70 69 72 65 74 69 6d 65 |.checkex|piretime|
|00000d40| 28 a4 74 69 6d 65 29 8c | 0d 06 04 37 20 20 f4 20 |(.time).|...7 . |
|00000d50| 63 68 65 63 6b 20 69 66 | 20 65 78 70 69 72 79 20 |check if| expiry |
|00000d60| 69 73 20 77 61 6e 74 65 | 64 3b 20 6d 61 72 6b 20 |is wante|d; mark |
|00000d70| 61 73 20 64 6f 6e 65 20 | 69 66 20 6e 6f 74 2e 0d |as done |if not..|
|00000d80| 06 0e 13 20 20 c8 8e 65 | 78 70 70 6f 6c 69 63 79 |... ..e|xppolicy|
|00000d90| 25 ca 0d 06 18 24 20 20 | 20 20 c9 31 3a f4 20 6e |%....$ | .1:. n|
|00000da0| 6f 20 71 75 65 73 74 69 | 6f 6e 20 2d 20 64 6f 20 |o questi|on - do |
|00000db0| 65 78 70 69 72 79 0d 06 | 22 37 20 20 20 20 c9 32 |expiry..|"7 .2|
|00000dc0| 3a f2 73 74 61 6d 70 28 | 6e 65 77 73 72 6f 6f 74 |:.stamp(|newsroot|
|00000dd0| 24 2b 22 2e 6e 65 77 73 | 22 29 3a f4 20 73 6b 69 |$+".news|"):. ski|
|00000de0| 70 20 74 68 69 73 20 65 | 78 70 69 72 79 0d 06 2c |p this e|xpiry..,|
|00000df0| 43 20 20 20 20 7f 3a e7 | a4 63 6f 6e 66 69 72 6d |C .:.|.confirm|
|00000e00| 32 28 a4 6d 73 67 30 28 | 22 45 63 6f 6e 66 69 72 |2(.msg0(|"Econfir|
|00000e10| 6d 22 29 29 3d 32 8c f2 | 73 74 61 6d 70 28 6e 65 |m"))=2..|stamp(ne|
|00000e20| 77 73 72 6f 6f 74 24 2b | 22 2e 6e 65 77 73 22 29 |wsroot$+|".news")|
|00000e30| 0d 06 36 07 20 20 cb 0d | 06 40 05 cd 0d 06 4a 20 |..6. ..|.@....J |
|00000e40| e7 72 77 25 8c 62 6c 6f | 63 6b 65 78 70 69 72 65 |.rw%.blo|ckexpire|
|00000e50| 25 3d 30 3a 63 72 6f 6e | 34 25 3d 30 0d 06 54 05 |%=0:cron|4%=0..T.|
|00000e60| e1 0d 06 5e 04 0d 06 68 | 11 dd f2 63 68 65 63 6b |...^...h|...check|
|00000e70| 65 78 70 69 72 65 0d 06 | 72 12 ea 74 25 2c 67 25 |expire..|r..t%,g%|
|00000e80| 2c 74 24 2c 6e 6f 77 25 | 0d 06 7c 0e 6e 6f 77 25 |,t$,now%|..|.now%|
|00000e90| 3d a4 74 69 6d 65 0d 06 | 86 1c e7 a4 63 68 65 63 |=.time..|....chec|
|00000ea0| 6b 65 78 70 69 72 65 74 | 69 6d 65 28 6e 6f 77 25 |kexpiret|ime(now%|
|00000eb0| 29 8c 0d 06 90 27 20 20 | f2 6c 6f 67 28 22 53 74 |)....' |.log("St|
|00000ec0| 61 72 74 69 6e 67 20 61 | 75 74 6f 6d 61 74 69 63 |arting a|utomatic|
|00000ed0| 20 65 78 70 69 72 79 22 | 29 0d 06 9a 28 20 20 f2 | expiry"|)...( .|
|00000ee0| 70 72 69 6e 74 28 22 22 | 2c a4 6d 73 67 30 28 22 |print(""|,.msg0("|
|00000ef0| 45 63 68 65 63 6b 22 29 | 2c 22 20 22 2c 22 20 22 |Echeck")|," "," "|
|00000f00| 29 0d 06 a4 1f 20 20 f2 | 73 74 61 6d 70 28 6e 65 |).... .|stamp(ne|
|00000f10| 77 73 72 6f 6f 74 24 2b | 22 2e 6e 65 77 73 22 29 |wsroot$+|".news")|
|00000f20| 0d 06 ae 11 20 20 67 25 | 3d 30 3a f5 67 25 2b 3d |.... g%|=0:.g%+=|
|00000f30| 31 0d 06 b8 26 20 20 20 | 20 74 25 3d a4 66 69 6c |1...& | t%=.fil|
|00000f40| 65 74 69 6d 65 28 a4 67 | 70 61 74 68 28 67 72 70 |etime(.g|path(grp|
|00000f50| 24 28 67 25 29 29 29 0d | 06 c2 2c 20 20 20 20 e7 |$(g%))).|.., .|
|00000f60| 74 25 3c 6e 6f 77 25 8c | f2 65 78 70 69 72 65 67 |t%<now%.|.expireg|
|00000f70| 72 6f 75 70 28 67 25 2c | 30 2c 61 75 74 6f 65 78 |roup(g%,|0,autoex|
|00000f80| 70 25 29 0d 06 cc 20 20 | 20 20 20 e7 67 25 83 31 |p%)... | .g%.1|
|00000f90| 30 3d 30 8c f2 70 6f 6c | 6c 28 73 6c 69 63 65 25 |0=0..pol|l(slice%|
|00000fa0| 2a 32 29 0d 06 d6 11 20 | 20 20 20 e7 63 61 6e 63 |*2).... | .canc|
|00000fb0| 65 6c 25 8c 0d 06 e0 44 | 20 20 20 20 20 20 e7 a4 |el%....D| ..|
|00000fc0| 63 6f 6e 66 69 72 6d 28 | a4 6d 73 67 31 28 22 43 |confirm(|.msg1("C|
|00000fd0| 63 61 6e 63 65 78 70 22 | 2c 67 24 29 2c 32 30 2c |cancexp"|,g$),20,|
|00000fe0| 30 29 3d 32 8c 63 61 6e | 63 65 6c 25 3d 30 8b 63 |0)=2.can|cel%=0.c|
|00000ff0| 61 6e 63 65 6c 25 3d b9 | 0d 06 ea 09 20 20 20 20 |ancel%=.|.... |
|00001000| cd 0d 06 f4 1c 20 20 fd | 67 25 3d 67 72 6f 75 70 |..... .|g%=group|
|00001010| 73 25 84 63 61 6e 63 65 | 6c 25 3c 3e 30 0d 06 fe |s%.cance|l%<>0...|
|00001020| 1d 20 20 f2 6c 6f 67 28 | 22 46 69 6e 69 73 68 65 |. .log(|"Finishe|
|00001030| 64 20 65 78 70 69 72 79 | 22 29 0d 07 08 38 20 20 |d expiry|")...8 |
|00001040| f2 72 75 6e 73 75 70 70 | 6f 72 74 28 22 54 72 69 |.runsupp|ort("Tri|
|00001050| 6d 6c 69 73 74 20 22 2b | c3 6e 67 65 78 70 25 2b |mlist "+|.ngexp%+|
|00001060| 22 20 22 2b c3 6c 6f 67 | 66 69 6c 65 74 69 6d 65 |" "+.log|filetime|
|00001070| 25 29 0d 07 12 12 20 20 | f2 65 78 70 69 72 65 66 |%).... |.expiref|
|00001080| 69 6c 65 73 0d 07 1c 05 | cd 0d 07 26 05 e1 0d 07 |iles....|...&....|
|00001090| 30 04 0d 07 3a 11 dd f2 | 65 78 70 69 72 65 66 69 |0...:...|expirefi|
|000010a0| 6c 65 73 0d 07 44 1a f2 | 65 78 70 6d 69 73 63 64 |les..D..|expmiscd|
|000010b0| 69 72 28 74 6d 70 64 69 | 72 24 2c 31 29 0d 07 4e |ir(tmpdi|r$,1)..N|
|000010c0| 23 f2 65 78 70 6d 69 73 | 63 64 69 72 28 62 61 64 |#.expmis|cdir(bad|
|000010d0| 64 69 72 24 2c 6b 65 65 | 70 6d 74 69 6d 65 25 29 |dir$,kee|pmtime%)|
|000010e0| 0d 07 58 24 f2 65 78 70 | 6d 69 73 63 64 69 72 28 |..X$.exp|miscdir(|
|000010f0| 62 61 64 6d 64 69 72 24 | 2c 6b 65 65 70 6d 74 69 |badmdir$|,keepmti|
|00001100| 6d 65 25 29 0d 07 62 24 | f2 65 78 70 6d 69 73 63 |me%)..b$|.expmisc|
|00001110| 64 69 72 28 62 61 64 6e | 64 69 72 24 2c 6b 65 65 |dir(badn|dir$,kee|
|00001120| 70 6e 74 69 6d 65 25 29 | 0d 07 6c 05 e1 0d 07 76 |pntime%)|..l....v|
|00001130| 04 0d 07 80 1b dd a4 63 | 68 65 63 6b 65 78 70 69 |.......c|heckexpi|
|00001140| 72 65 74 69 6d 65 28 6e | 6f 77 25 29 0d 07 8a 1a |retime(n|ow%)....|
|00001150| ea 79 65 73 25 2c 6c 61 | 73 74 25 2c 6e 6f 77 24 |.yes%,la|st%,now$|
|00001160| 2c 74 65 73 74 24 0d 07 | 94 0a 79 65 73 25 3d 30 |,test$..|..yes%=0|
|00001170| 0d 07 9e 09 e7 72 77 25 | 8c 0d 07 a8 28 20 20 6c |.....rw%|....( l|
|00001180| 61 73 74 25 3d a4 66 69 | 6c 65 74 69 6d 65 28 6e |ast%=.fi|letime(n|
|00001190| 65 77 73 72 6f 6f 74 24 | 2b 22 2e 6e 65 77 73 22 |ewsroot$|+".news"|
|000011a0| 29 0d 07 b2 43 20 20 f4 | 20 74 65 73 74 24 20 69 |)...C .| test$ i|
|000011b0| 73 20 65 78 70 69 72 79 | 20 74 72 69 67 67 65 72 |s expiry| trigger|
|000011c0| 20 74 69 6d 65 20 61 73 | 20 73 74 72 69 6e 67 2c | time as| string,|
|000011d0| 20 66 6f 72 6d 61 74 20 | 43 45 59 52 4d 4e 44 59 | format |CEYRMNDY|
|000011e0| 48 52 4d 49 0d 07 bc 38 | 20 20 f4 20 46 4e 66 69 |HRMI...8| . FNfi|
|000011f0| 6c 65 74 69 6d 65 20 72 | 65 74 75 72 6e 73 20 66 |letime r|eturns f|
|00001200| 69 6c 65 20 74 69 6d 65 | 73 74 61 6d 70 20 69 6e |ile time|stamp in|
|00001210| 20 73 61 6d 65 20 66 6f | 72 6d 61 74 0d 07 c6 1d | same fo|rmat....|
|00001220| 20 20 e7 61 75 74 6f 65 | 78 70 25 80 69 6e 64 65 | .autoe|xp%.inde|
|00001230| 62 61 74 63 68 25 3d 30 | 8c 0d 07 d0 2d 20 20 20 |batch%=0|....- |
|00001240| 20 74 65 73 74 24 3d c3 | 28 6c 61 73 74 25 2b 31 | test$=.|(last%+1|
|00001250| 29 2b c2 22 30 30 30 30 | 22 2b c3 65 78 70 74 69 |)+."0000|"+.expti|
|00001260| 6d 65 25 2c 34 29 0d 07 | da 16 20 20 20 20 6e 6f |me%,4)..|.. no|
|00001270| 77 24 3d a4 66 75 6c 6c | 74 69 6d 65 0d 07 e4 2b |w$=.full|time...+|
|00001280| 20 20 20 20 79 65 73 25 | 3d 28 a4 6a 75 6c 69 61 | yes%|=(.julia|
|00001290| 6e 28 6e 6f 77 24 29 3e | a4 6a 75 6c 69 61 6e 28 |n(now$)>|.julian(|
|000012a0| 74 65 73 74 24 29 29 0d | 07 ee 0e 20 20 20 20 e7 |test$)).|... .|
|000012b0| 79 65 73 25 8c 0d 07 f8 | 36 20 20 20 20 20 20 f4 |yes%....|6 .|
|000012c0| 20 61 6c 73 6f 20 63 68 | 65 63 6b 20 6c 61 73 74 | also ch|eck last|
|000012d0| 20 65 78 70 69 72 79 20 | 77 61 73 20 62 65 66 6f | expiry |was befo|
|000012e0| 72 65 20 74 6f 64 61 79 | 2e 2e 2e 0d 08 02 1d 20 |re today|....... |
|000012f0| 20 20 20 20 20 e7 6c 61 | 73 74 25 3e 3d 6e 6f 77 | .la|st%>=now|
|00001300| 25 8c 79 65 73 25 3d 30 | 0d 08 0c 4d 20 20 20 20 |%.yes%=0|...M |
|00001310| 20 20 f4 20 61 6e 64 20 | 63 68 65 63 6b 20 74 72 | . and |check tr|
|00001320| 61 6e 73 70 6f 72 74 20 | 6e 6f 74 20 61 63 74 69 |ansport |not acti|
|00001330| 76 65 2e 2e 2e 20 64 6f | 6e 27 74 20 77 61 6e 74 |ve... do|n't want|
|00001340| 20 65 78 70 69 72 79 20 | 77 68 69 6c 65 20 6f 6e | expiry |while on|
|00001350| 6c 69 6e 65 2e 0d 08 16 | 44 20 20 20 20 20 20 e7 |line....|D .|
|00001360| 79 65 73 25 8c e7 a4 72 | 75 6e 74 72 61 6e 73 70 |yes%...r|untransp|
|00001370| 6f 72 74 66 69 6c 65 28 | 64 65 66 73 6f 75 72 63 |ortfile(|defsourc|
|00001380| 65 25 2c 31 35 2c 22 22 | 2c 22 22 2c 22 22 29 3c |e%,15,""|,"","")<|
|00001390| 3e 30 8c 79 65 73 25 3d | 30 0d 08 20 09 20 20 20 |>0.yes%=|0.. . |
|000013a0| 20 cd 0d 08 2a 07 20 20 | cd 0d 08 34 05 cd 0d 08 | ...*. |...4....|
|000013b0| 3e 09 3d 79 65 73 25 0d | 08 48 04 0d 08 52 10 dd |>.=yes%.|.H...R..|
|000013c0| a4 6a 75 6c 69 61 6e 28 | 74 24 29 0d 08 5c 12 ea |.julian(|t$)..\..|
|000013d0| 59 2c 4d 2c 44 2c 79 2c | 6d 2c 41 2c 42 0d 08 66 |Y,M,D,y,|m,A,B..f|
|000013e0| 30 f4 20 61 63 63 65 70 | 74 73 20 74 69 6d 65 20 |0. accep|ts time |
|000013f0| 73 74 72 69 6e 67 20 69 | 6e 20 66 6f 72 6d 61 74 |string i|n format|
|00001400| 20 43 45 59 59 4d 4d 44 | 44 68 68 6d 6d 0d 08 70 | CEYYMMD|Dhhmm..p|
|00001410| 2f 59 3d bb c0 74 24 2c | 34 29 3a 4d 3d bb c1 74 |/Y=..t$,|4):M=..t|
|00001420| 24 2c 35 2c 32 29 3a 44 | 3d bb c1 74 24 2c 37 2c |$,5,2):D|=..t$,7,|
|00001430| 32 29 3a 54 3d bb c2 74 | 24 2c 34 29 0d 08 7a 10 |2):T=..t|$,4)..z.|
|00001440| 44 3d 44 2b 28 54 2f 32 | 34 30 30 29 0d 08 84 1e |D=D+(T/2|400)....|
|00001450| e7 4d 3e 32 8c 79 3d 59 | 3a 6d 3d 4d 3a 8b 79 3d |.M>2.y=Y|:m=M:.y=|
|00001460| 59 2d 31 3a 6d 3d 4d 2b | 31 32 0d 08 8e 3b e7 59 |Y-1:m=M+|12...;.Y|
|00001470| 2b 4d 2f 31 30 30 2b 44 | 2f 31 30 30 30 30 3e 3d |+M/100+D|/10000>=|
|00001480| 31 35 38 32 2e 31 30 31 | 35 8c 41 3d a8 28 79 2f |1582.101|5.A=.(y/|
|00001490| 31 30 30 29 3a 42 3d 32 | 2d 41 2b a8 28 41 2f 34 |100):B=2|-A+.(A/4|
|000014a0| 29 8b 42 3d 30 0d 08 98 | 33 3d a8 28 33 36 35 2e |).B=0...|3=.(365.|
|000014b0| 32 35 2a 28 79 2b 34 37 | 31 36 29 29 2b a8 28 33 |25*(y+47|16))+.(3|
|000014c0| 30 2e 36 30 30 31 2a 28 | 6d 2b 31 29 29 2b 44 2b |0.6001*(|m+1))+D+|
|000014d0| 42 2d 31 35 32 34 2e 35 | 0d 08 a2 04 0d 08 ac 0f |B-1524.5|........|
|000014e0| dd f2 70 6f 73 74 66 65 | 74 63 68 0d 08 b6 2e 70 |..postfe|tch....p|
|000014f0| 6f 73 74 66 65 74 63 68 | 72 65 61 64 79 25 3d 30 |ostfetch|ready%=0|
|00001500| 3a f2 6e 62 75 70 64 61 | 74 65 28 31 30 2c 22 22 |:.nbupda|te(10,""|
|00001510| 2c 30 2c 22 22 2c 22 22 | 29 0d 08 c0 3e 74 25 3d |,0,"",""|)...>t%=|
|00001520| a4 72 75 6e 74 72 61 6e | 73 70 6f 72 74 66 69 6c |.runtran|sportfil|
|00001530| 65 28 64 65 66 73 6f 75 | 72 63 65 25 2c 35 2c 22 |e(defsou|rce%,5,"|
|00001540| 22 2c 22 22 2c 22 22 29 | 3a f4 20 70 6f 73 74 66 |","","")|:. postf|
|00001550| 65 74 63 68 2e 2e 2e 0d | 08 ca 05 e1 0d 08 d4 04 |etch....|........|
|00001560| 0d 08 de 13 dd f2 63 68 | 65 63 6b 6f 75 74 66 69 |......ch|eckoutfi|
|00001570| 6c 65 73 0d 08 e8 1a ea | 6c 25 2c 6c 31 25 2c 74 |les.....|l%,l1%,t|
|00001580| 25 2c 66 24 2c 64 24 2c | 70 24 2c 6e 25 0d 08 f2 |%,f$,d$,|p$,n%...|
|00001590| 20 64 24 3d 64 65 66 69 | 63 24 3a 64 65 66 69 63 | d$=defi|c$:defic|
|000015a0| 24 3d 22 6e 65 77 73 62 | 61 73 65 31 22 0d 08 fc |$="newsb|ase1"...|
|000015b0| 0f 74 25 3d 64 65 66 6d | 61 69 6c 25 0d 09 06 0c |.t%=defm|ail%....|
|000015c0| e3 6c 31 25 3d 31 b8 32 | 0d 09 10 07 20 20 f5 0d |.l1%=1.2|.... ..|
|000015d0| 09 1a 1f 20 20 20 20 66 | 24 3d 74 72 61 6e 73 6f |... f|$=transo|
|000015e0| 24 28 74 25 2c 6c 25 29 | 3a 6c 25 2b 3d 31 0d 09 |$(t%,l%)|:l%+=1..|
|000015f0| 24 0f 20 20 20 20 e7 66 | 24 3e 22 22 8c 0d 09 2e |$. .f|$>""....|
|00001600| 22 20 20 20 20 20 20 64 | 24 3d a4 64 69 72 28 66 |" d|$=.dir(f|
|00001610| 24 29 3a 70 24 3d a4 6c | 65 61 66 28 66 24 29 0d |$):p$=.l|eaf(f$).|
|00001620| 09 38 37 20 20 20 20 20 | 20 c8 99 22 58 4f 53 5f |.87 | .."XOS_|
|00001630| 47 42 50 42 22 2c 39 2c | 64 24 2c 74 6d 70 25 2c |GBPB",9,|d$,tmp%,|
|00001640| 31 2c 30 2c 32 35 35 2c | 70 24 20 b8 2c 2c 2c 6e |1,0,255,|p$ .,,,n|
|00001650| 25 3b 65 72 72 25 0d 09 | 42 2d 20 20 20 20 20 20 |%;err%..|B- |
|00001660| e7 28 65 72 72 25 80 31 | 29 3d 30 80 6e 25 3e 30 |.(err%.1|)=0.n%>0|
|00001670| 8c 64 65 66 69 63 24 3d | 22 6e 65 77 73 62 61 73 |.defic$=|"newsbas|
|00001680| 65 32 22 0d 09 4c 09 20 | 20 20 20 cd 0d 09 56 12 |e2"..L. | ...V.|
|00001690| 20 20 fd 66 24 3d 22 22 | 84 6c 25 3d 31 31 0d 09 | .f$=""|.l%=11..|
|000016a0| 60 11 20 20 74 25 3d 64 | 65 66 6e 65 77 73 25 0d |`. t%=d|efnews%.|
|000016b0| 09 6a 08 ed 6c 31 25 0d | 09 74 21 e7 64 24 3c 3e |.j..l1%.|.t!.d$<>|
|000016c0| 64 65 66 69 63 24 8c f2 | 63 68 61 6e 67 65 69 63 |defic$..|changeic|
|000016d0| 28 64 65 66 69 63 24 29 | 0d 09 7e 05 e1 0d 09 88 |(defic$)|..~.....|
|000016e0| 04 0d 09 92 1a dd a4 63 | 68 65 63 6b 69 6e 66 69 |.......c|heckinfi|
|000016f0| 6c 65 73 28 74 31 25 2c | 41 24 29 0d 09 9c 3f ea |les(t1%,|A$)...?.|
|00001700| 72 65 73 75 6c 74 24 2c | 6e 25 2c 6e 65 78 74 25 |result$,|n%,next%|
|00001710| 2c 66 24 2c 66 66 24 2c | 66 25 2c 46 25 2c 6c 25 |,f$,ff$,|f%,F%,l%|
|00001720| 2c 73 6f 75 72 63 65 24 | 2c 70 61 74 24 2c 64 69 |,source$|,pat$,di|
|00001730| 72 62 75 66 25 2c 64 62 | 72 25 0d 09 a6 0b 6e 65 |rbuf%,db|r%....ne|
|00001740| 78 74 25 3d 30 0d 09 b0 | 27 64 62 72 25 3d a4 63 |xt%=0...|'dbr%=.c|
|00001750| 6c 61 69 6d 28 64 69 72 | 62 75 66 25 2c 64 62 73 |laim(dir|buf%,dbs|
|00001760| 69 7a 65 25 2c 22 64 62 | 75 66 22 29 0d 09 ba 23 |ize%,"db|uf")...#|
|00001770| 73 6f 75 72 63 65 24 3d | a4 64 69 72 28 41 24 29 |source$=|.dir(A$)|
|00001780| 3a 70 61 74 24 3d a4 6c | 65 61 66 28 41 24 29 0d |:pat$=.l|eaf(A$).|
|00001790| 09 c4 05 f5 0d 09 ce 49 | 20 20 c8 99 22 58 4f 53 |.......I| .."XOS|
|000017a0| 5f 47 42 50 42 22 2c 39 | 2c 73 6f 75 72 63 65 24 |_GBPB",9|,source$|
|000017b0| 2c 64 69 72 62 75 66 25 | 2c 31 2c 6e 65 78 74 25 |,dirbuf%|,1,next%|
|000017c0| 2c 64 62 73 69 7a 65 25 | 2c 70 61 74 24 20 b8 2c |,dbsize%|,pat$ .,|
|000017d0| 2c 2c 6e 25 2c 6e 65 78 | 74 25 3b 46 25 0d 09 d8 |,,n%,nex|t%;F%...|
|000017e0| 15 20 20 e7 28 46 25 80 | 31 29 3d 30 80 6e 25 3e |. .(F%.|1)=0.n%>|
|000017f0| 30 8c 0d 09 e2 2b 20 20 | 20 20 66 24 3d a4 73 74 |0....+ | f$=.st|
|00001800| 72 28 64 69 72 62 75 66 | 25 29 3a 66 66 24 3d 73 |r(dirbuf|%):ff$=s|
|00001810| 6f 75 72 63 65 24 2b 22 | 2e 22 2b 66 24 0d 09 ec |ource$+"|."+f$...|
|00001820| 30 20 20 20 20 f4 20 61 | 74 74 65 6d 70 74 20 64 |0 . a|ttempt d|
|00001830| 65 6c 65 74 69 6f 6e 20 | 6f 66 20 61 6e 79 20 65 |eletion |of any e|
|00001840| 6d 70 74 79 20 66 69 6c | 65 73 2e 2e 2e 0d 09 f6 |mpty fil|es......|
|00001850| 2a 20 20 20 20 e7 a4 66 | 69 6c 65 73 69 7a 65 28 |* ..f|ilesize(|
|00001860| 66 66 24 29 3d 30 8c 46 | 25 3d a4 64 65 6c 66 69 |ff$)=0.F|%=.delfi|
|00001870| 6c 65 28 66 66 24 29 0d | 0a 00 36 20 20 20 20 f4 |le(ff$).|..6 .|
|00001880| 20 73 65 65 20 69 66 20 | 66 69 6c 65 20 63 61 6e | see if |file can|
|00001890| 20 62 65 20 6f 70 65 6e | 65 64 20 66 6f 72 20 72 | be open|ed for r|
|000018a0| 65 61 64 20 61 63 63 65 | 73 73 2e 2e 2e 0d 0a 0a |ead acce|ss......|
|000018b0| 1d 20 20 20 20 46 25 3d | 30 3a 66 31 25 3d a4 6f |. F%=|0:f1%=.o|
|000018c0| 70 65 6e 69 6e 28 66 66 | 24 29 0d 0a 14 10 20 20 |penin(ff|$).... |
|000018d0| 20 20 e7 66 31 25 3c 3e | 30 8c 0d 0a 1e 12 20 20 | .f1%<>|0..... |
|000018e0| 20 20 20 20 f2 63 66 28 | 66 31 25 29 0d 0a 28 1d | .cf(|f1%)..(.|
|000018f0| 20 20 20 20 20 20 e7 73 | 6f 75 72 63 65 24 3c 3e | .s|ource$<>|
|00001900| 77 6f 72 6b 64 69 72 24 | 8c 0d 0a 32 31 20 20 20 |workdir$|...21 |
|00001910| 20 20 20 20 20 46 25 3d | a4 72 75 6e 74 72 61 6e | F%=|.runtran|
|00001920| 73 70 6f 72 74 66 69 6c | 65 28 74 31 25 2c 34 2c |sportfil|e(t1%,4,|
|00001930| 66 66 24 2c 22 22 2c 22 | 22 29 0d 0a 3c 14 20 20 |ff$,"","|")..<. |
|00001940| 20 20 20 20 20 20 20 20 | e7 46 25 3d 30 8c 0d 0a | |.F%=0...|
|00001950| 46 2f 20 20 20 20 20 20 | 20 20 20 20 46 25 3d a4 |F/ | F%=.|
|00001960| 6d 6f 76 65 66 69 6c 65 | 28 66 66 24 2c 77 6f 72 |movefile|(ff$,wor|
|00001970| 6b 64 69 72 24 2b 22 2e | 22 2b 66 24 29 0d 0a 50 |kdir$+".|"+f$)..P|
|00001980| 0f 20 20 20 20 20 20 20 | 20 20 20 cc 0d 0a 5a 47 |. | ...ZG|
|00001990| 20 20 20 20 20 20 20 20 | 20 20 f2 6d 65 73 73 61 | | .messa|
|000019a0| 67 65 31 28 22 44 6e 6f | 70 72 65 66 65 74 63 68 |ge1("Dno|prefetch|
|000019b0| 22 2c a4 76 61 72 76 61 | 6c 28 22 4e 65 77 73 62 |",.varva|l("Newsb|
|000019c0| 61 73 65 24 52 65 74 75 | 72 6e 49 6e 66 6f 22 29 |ase$Retu|rnInfo")|
|000019d0| 2c 31 29 0d 0a 64 0d 20 | 20 20 20 20 20 20 20 cd |,1)..d. | .|
|000019e0| 0d 0a 6e 0b 20 20 20 20 | 20 20 cd 0d 0a 78 27 20 |..n. | ...x' |
|000019f0| 20 20 20 20 20 e7 46 25 | 3d 30 8c 72 65 73 75 6c | .F%|=0.resul|
|00001a00| 74 24 3d 77 6f 72 6b 64 | 69 72 24 2b 22 2e 22 2b |t$=workd|ir$+"."+|
|00001a10| 66 24 0d 0a 82 09 20 20 | 20 20 cd 0d 0a 8c 09 20 |f$.... | ..... |
|00001a20| 20 20 20 cc 0d 0a 96 17 | 20 20 20 20 f2 70 6f 6c | .....| .pol|
|00001a30| 6c 28 73 6c 69 63 65 25 | 2a 32 29 0d 0a a0 07 20 |l(slice%|*2).... |
|00001a40| 20 cd 0d 0a aa 21 fd 72 | 65 73 75 6c 74 24 3e 22 | ....!.r|esult$>"|
|00001a50| 22 84 6e 65 78 74 25 3c | 30 84 28 46 25 80 31 29 |".next%<|0.(F%.1)|
|00001a60| 3c 3e 30 0d 0a b4 12 f2 | 72 65 6c 65 61 73 65 28 |<>0.....|release(|
|00001a70| 64 62 72 25 29 0d 0a be | 0c 3d 72 65 73 75 6c 74 |dbr%)...|.=result|
|00001a80| 24 0d 0a c8 04 0d 0a d2 | 11 dd f2 63 68 65 63 6b |$.......|...check|
|00001a90| 74 6f 73 65 6e 64 0d 0a | dc 38 ea 6e 25 2c 6e 65 |tosend..|.8.n%,ne|
|00001aa0| 78 74 25 2c 66 24 2c 64 | 24 2c 46 25 2c 64 69 72 |xt%,f$,d|$,F%,dir|
|00001ab0| 62 75 66 25 2c 64 62 72 | 25 2c 69 6e 66 6f 24 2c |buf%,dbr|%,info$,|
|00001ac0| 75 24 2c 74 79 25 2c 74 | 72 25 2c 6c 31 25 0d 0a |u$,ty%,t|r%,l1%..|
|00001ad0| e6 09 e7 72 77 25 8c 0d | 0a f0 2f 20 20 6e 66 25 |...rw%..|../ nf%|
|00001ae0| 3d 30 3a 64 62 72 25 3d | a4 63 6c 61 69 6d 28 64 |=0:dbr%=|.claim(d|
|00001af0| 69 72 62 75 66 25 2c 64 | 62 73 69 7a 65 25 2c 22 |irbuf%,d|bsize%,"|
|00001b00| 64 62 75 66 22 29 0d 0a | fa 18 20 20 74 79 25 3d |dbuf")..|.. ty%=|
|00001b10| 30 3a 74 72 25 3d 64 65 | 66 6d 61 69 6c 25 0d 0b |0:tr%=de|fmail%..|
|00001b20| 04 24 20 20 e3 6c 31 25 | 3d 31 b8 32 3a 6e 25 3d |.$ .l1%|=1.2:n%=|
|00001b30| 74 72 61 6e 73 6d 25 28 | 74 72 25 2c 74 79 25 2b |transm%(|tr%,ty%+|
|00001b40| 31 29 0d 0b 0e 1e 20 20 | 20 20 e7 a4 66 72 65 65 |1).... | ..free|
|00001b50| 6d 65 6d 28 30 29 3e 3d | 6e 25 2a 31 30 32 34 8c |mem(0)>=|n%*1024.|
|00001b60| 0d 0b 18 13 20 20 20 20 | 20 20 6e 65 78 74 25 3d |.... | next%=|
|00001b70| 30 3a f5 0d 0b 22 52 20 | 20 20 20 20 20 20 20 c8 |0:..."R | .|
|00001b80| 99 22 58 4f 53 5f 47 42 | 50 42 22 2c 39 2c 6f 75 |."XOS_GB|PB",9,ou|
|00001b90| 74 64 69 72 24 28 74 79 | 25 29 2c 64 69 72 62 75 |tdir$(ty|%),dirbu|
|00001ba0| 66 25 2c 31 2c 6e 65 78 | 74 25 2c 64 62 73 69 7a |f%,1,nex|t%,dbsiz|
|00001bb0| 65 25 2c 22 2a 22 b8 2c | 2c 2c 6e 25 2c 6e 65 78 |e%,"*".,|,,n%,nex|
|00001bc0| 74 25 3b 46 25 0d 0b 2c | 1b 20 20 20 20 20 20 20 |t%;F%..,|. |
|00001bd0| 20 e7 28 46 25 80 31 29 | 3d 30 80 6e 25 3e 30 8c | .(F%.1)|=0.n%>0.|
|00001be0| 0d 0b 36 41 20 20 20 20 | 20 20 20 20 20 20 66 24 |..6A | f$|
|00001bf0| 3d 6f 75 74 64 69 72 24 | 28 74 79 25 29 2b 22 2e |=outdir$|(ty%)+".|
|00001c00| 22 2b a4 73 74 72 28 64 | 69 72 62 75 66 25 29 3a |"+.str(d|irbuf%):|
|00001c10| f2 73 65 74 74 79 70 65 | 28 66 24 2c 26 46 46 46 |.settype|(f$,&FFF|
|00001c20| 29 0d 0b 40 2d 20 20 20 | 20 20 20 20 20 20 20 64 |)..@- | d|
|00001c30| 24 3d a4 74 6d 70 66 69 | 6c 65 3a 46 25 3d a4 6d |$=.tmpfi|le:F%=.m|
|00001c40| 6f 76 65 66 69 6c 65 28 | 66 24 2c 64 24 29 0d 0b |ovefile(|f$,d$)..|
|00001c50| 4a 18 20 20 20 20 20 20 | 20 20 20 20 e7 28 46 25 |J. | .(F%|
|00001c60| 80 31 29 3d 30 8c 0d 0b | 54 31 20 20 20 20 20 20 |.1)=0...|T1 |
|00001c70| 20 20 20 20 6e 65 78 74 | 25 2d 3d 31 3a 69 6e 66 | next|%-=1:inf|
|00001c80| 6f 24 3d a4 6b 65 65 70 | 66 69 6c 65 28 74 79 25 |o$=.keep|file(ty%|
|00001c90| 2c 64 24 2c 75 24 29 0d | 0b 5e 14 20 20 20 20 20 |,d$,u$).|.^. |
|00001ca0| 20 20 20 20 20 c8 8e 74 | 79 25 ca 0d 0b 68 26 20 | ..t|y%...h& |
|00001cb0| 20 20 20 20 20 20 20 20 | 20 20 20 c9 30 3a 72 24 | | .0:r$|
|00001cc0| 3d a4 73 65 6e 64 6d 61 | 69 6c 28 64 24 2c 75 24 |=.sendma|il(d$,u$|
|00001cd0| 29 0d 0b 72 2c 20 20 20 | 20 20 20 20 20 20 20 20 |)..r, | |
|00001ce0| 20 c9 31 3a 72 24 3d a4 | 73 65 6e 64 6e 65 77 73 | .1:r$=.|sendnews|
|00001cf0| 28 64 24 2c 69 6e 66 6f | 24 2c 75 24 29 0d 0b 7c |(d$,info|$,u$)..||
|00001d00| 0f 20 20 20 20 20 20 20 | 20 20 20 cb 0d 0b 86 2f |. | ..../|
|00001d10| 20 20 20 20 20 20 20 20 | 20 20 e7 72 24 3e 22 22 | | .r$>""|
|00001d20| f2 6d 65 73 73 61 67 65 | 31 28 22 51 73 65 6e 64 |.message|1("Qsend|
|00001d30| 66 61 69 6c 22 2c 64 24 | 2c 31 29 0d 0b 90 1d 20 |fail",d$|,1).... |
|00001d40| 20 20 20 20 20 20 20 20 | 20 f2 70 6f 6c 6c 28 73 | | .poll(s|
|00001d50| 6c 69 63 65 25 2a 32 29 | 0d 0b 9a 0f 20 20 20 20 |lice%*2)|.... |
|00001d60| 20 20 20 20 20 20 cd 0d | 0b a4 0d 20 20 20 20 20 | ..|... |
|00001d70| 20 20 20 cd 0d 0b ae 1c | 20 20 20 20 20 20 fd 6e | .....| .n|
|00001d80| 65 78 74 25 3c 30 84 28 | 46 25 80 31 29 3c 3e 30 |ext%<0.(|F%.1)<>0|
|00001d90| 0d 0b b8 09 20 20 20 20 | cd 0d 0b c2 1a 20 20 20 |.... |..... |
|00001da0| 20 74 79 25 3d 31 3a 74 | 72 25 3d 64 65 66 6e 65 | ty%=1:t|r%=defne|
|00001db0| 77 73 25 0d 0b cc 0a 20 | 20 ed 6c 31 25 0d 0b d6 |ws%.... | .l1%...|
|00001dc0| 14 20 20 f2 72 65 6c 65 | 61 73 65 28 64 62 72 25 |. .rele|ase(dbr%|
|00001dd0| 29 0d 0b e0 05 cd 0d 0b | ea 05 e1 0d 0b f4 04 0d |).......|........|
|00001de0| 0b fe 0d dd a4 64 69 72 | 28 66 24 29 0d 0c 08 07 |.....dir|(f$)....|
|00001df0| ea 6c 25 0d 0c 12 25 6c | 25 3d a9 66 24 3a f5 6c |.l%...%l|%=.f$:.l|
|00001e00| 25 2d 3d 31 3a fd c1 66 | 24 2c 6c 25 2c 31 29 3d |%-=1:..f|$,l%,1)=|
|00001e10| 22 2e 22 84 6c 25 3c 32 | 0d 0c 1c 0e 3d c0 66 24 |".".l%<2|....=.f$|
|00001e20| 2c 6c 25 2d 31 29 0d 0c | 26 04 0d 0c 30 0e dd a4 |,l%-1)..|&...0...|
|00001e30| 6c 65 61 66 28 66 24 29 | 0d 0c 3a 07 ea 6c 25 0d |leaf(f$)|..:..l%.|
|00001e40| 0c 44 25 6c 25 3d a9 66 | 24 3a f5 6c 25 2d 3d 31 |.D%l%=.f|$:.l%-=1|
|00001e50| 3a fd c1 66 24 2c 6c 25 | 2c 31 29 3d 22 2e 22 84 |:..f$,l%|,1)=".".|
|00001e60| 6c 25 3c 32 0d 0c 4e 0e | 3d c1 66 24 2c 6c 25 2b |l%<2..N.|=.f$,l%+|
|00001e70| 31 29 0d 0c 58 04 0d 0c | 62 1e dd f2 64 6f 62 61 |1)..X...|b...doba|
|00001e80| 74 63 68 28 66 75 6c 6c | 62 66 24 2c 62 73 74 61 |tch(full|bf$,bsta|
|00001e90| 72 74 25 29 0d 0c 6c 0f | ea 62 66 24 2c 74 79 24 |rt%)..l.|.bf$,ty$|
|00001ea0| 2c 46 25 0d 0c 76 25 62 | 66 24 3d a4 6c 65 61 66 |,F%..v%b|f$=.leaf|
|00001eb0| 28 66 75 6c 6c 62 66 24 | 29 3a 67 6c 6f 62 61 6c |(fullbf$|):global|
|00001ec0| 5f 62 66 24 3d 62 66 24 | 0d 0c 80 18 f2 64 65 63 |_bf$=bf$|.....dec|
|00001ed0| 6f 6d 70 72 65 73 73 28 | 66 75 6c 6c 62 66 24 29 |ompress(|fullbf$)|
|00001ee0| 0d 0c 8a 1e e7 a4 66 69 | 6c 65 74 79 70 65 28 66 |......fi|letype(f|
|00001ef0| 75 6c 6c 62 66 24 29 3d | 26 46 43 41 20 8c 0d 0c |ullbf$)=|&FCA ...|
|00001f00| 94 4a 20 20 f2 6d 65 73 | 73 61 67 65 30 28 22 43 |.J .mes|sage0("C|
|00001f10| 6f 6d 70 46 61 69 6c 34 | 22 2c 31 29 3a f2 6c 6f |ompFail4|",1):.lo|
|00001f20| 67 28 22 42 61 74 63 68 | 20 64 65 63 6f 6d 70 72 |g("Batch| decompr|
|00001f30| 65 73 73 69 6f 6e 20 66 | 61 69 6c 65 64 20 66 6f |ession f|ailed fo|
|00001f40| 72 20 22 2b 62 66 24 29 | 0d 0c 9e 39 20 20 e7 a4 |r "+bf$)|...9 ..|
|00001f50| 6d 6f 76 65 74 6f 64 65 | 62 75 67 28 66 75 6c 6c |movetode|bug(full|
|00001f60| 62 66 24 29 3c 3e 30 8c | 46 25 3d a4 66 6f 72 63 |bf$)<>0.|F%=.forc|
|00001f70| 65 64 65 6c 66 69 6c 65 | 28 66 75 6c 6c 62 66 24 |edelfile|(fullbf$|
|00001f80| 29 0d 0c a8 07 20 20 cc | 0d 0c b2 1f 20 20 f2 73 |).... .|.... .s|
|00001f90| 74 61 72 74 6d 65 6d 6d | 67 72 3a 69 6e 64 65 62 |tartmemm|gr:indeb|
|00001fa0| 61 74 63 68 25 3d b9 0d | 0c bc 40 20 20 69 6e 62 |atch%=..|..@ inb|
|00001fb0| 75 66 25 3d 62 61 73 65 | 25 3a f2 65 78 74 65 6e |uf%=base|%:.exten|
|00001fc0| 64 28 69 6e 62 75 66 73 | 69 7a 65 25 29 3a 61 72 |d(inbufs|ize%):ar|
|00001fd0| 74 62 61 73 65 25 3d 62 | 61 73 65 25 2b 69 6e 62 |tbase%=b|ase%+inb|
|00001fe0| 75 66 73 69 7a 65 25 0d | 0c c6 29 20 20 f2 70 72 |ufsize%.|..) .pr|
|00001ff0| 69 6e 74 28 a4 6d 73 67 | 30 28 22 44 73 74 61 72 |int(.msg|0("Dstar|
|00002000| 74 22 29 2c 22 20 22 2c | 22 20 22 2c 22 20 22 29 |t")," ",|" "," ")|
|00002010| 0d 0c d0 21 20 20 f2 6f | 70 65 6e 62 61 74 63 68 |...! .o|penbatch|
|00002020| 28 66 75 6c 6c 62 66 24 | 2c 62 73 74 61 72 74 25 |(fullbf$|,bstart%|
|00002030| 29 0d 0c da 16 20 20 63 | 61 6e 63 65 6c 25 3d a3 |).... c|ancel%=.|
|00002040| 3a 64 65 6c 25 3d b9 0d | 0c e4 3e 20 20 74 6f 74 |:del%=..|..> tot|
|00002050| 61 6c 25 3d 30 3a 6f 66 | 66 25 3d 30 3a 70 74 72 |al%=0:of|f%=0:ptr|
|00002060| 25 3d 30 3a 72 65 63 70 | 6f 73 25 3d 30 3a 6c 61 |%=0:recp|os%=0:la|
|00002070| 73 74 70 6f 73 25 3d 30 | 3a 62 61 74 61 72 74 6c |stpos%=0|:batartl|
|00002080| 65 6e 25 3d 30 0d 0c ee | 20 20 20 69 6e 64 65 78 |en%=0...| index|
|00002090| 74 6f 74 61 6c 25 3d 30 | 3a 69 6e 64 65 78 68 69 |total%=0|:indexhi|
|000020a0| 74 73 25 3d 30 0d 0c f8 | 2a 20 20 74 79 70 65 25 |ts%=0...|* type%|
|000020b0| 3d a4 69 64 65 6e 74 69 | 66 79 66 69 6c 65 28 66 |=.identi|fyfile(f|
|000020c0| 75 6c 6c 62 66 24 2c 62 | 73 74 61 72 74 25 29 0d |ullbf$,b|start%).|
|000020d0| 0d 02 32 20 20 e7 74 79 | 70 65 25 3d 30 8c 74 79 |..2 .ty|pe%=0.ty|
|000020e0| 24 3d a4 6d 73 67 30 28 | 22 4d 61 69 6c 22 29 8b |$=.msg0(|"Mail").|
|000020f0| 74 79 24 3d a4 6d 73 67 | 30 28 22 4e 65 77 73 22 |ty$=.msg|0("News"|
|00002100| 29 0d 0d 0c 29 20 20 f2 | 70 72 69 6e 74 28 a4 6d |)...) .|print(.m|
|00002110| 73 67 31 28 22 44 74 79 | 70 65 22 2c 74 79 24 29 |sg1("Dty|pe",ty$)|
|00002120| 2c 22 22 2c 22 22 2c 22 | 22 29 0d 0d 16 13 20 20 |,"","","|").... |
|00002130| 64 73 74 69 6d 65 25 3d | 74 69 6d 65 25 0d 0d 20 |dstime%=|time%.. |
|00002140| 0e 20 20 c8 95 65 6f 66 | 25 3d a3 0d 0d 2a 2b 20 |. ..eof|%=...*+ |
|00002150| 20 20 20 63 61 6e 63 65 | 6c 25 3d a3 3a f2 64 6f | cance|l%=.:.do|
|00002160| 61 72 74 69 63 6c 65 28 | 62 66 24 29 3a f2 73 61 |article(|bf$):.sa|
|00002170| 76 65 6c 69 73 74 0d 0d | 34 31 20 20 20 20 e7 63 |velist..|41 .c|
|00002180| 61 6e 63 65 6c 25 8c f2 | 77 72 69 74 65 5f 72 65 |ancel%..|write_re|
|00002190| 63 66 69 6c 65 28 62 66 | 24 29 3a f2 63 61 6e 63 |cfile(bf|$):.canc|
|000021a0| 65 6c 62 61 74 63 68 0d | 0d 3e 07 20 20 ce 0d 0d |elbatch.|.>. ...|
|000021b0| 48 1d 20 20 f2 65 78 74 | 65 6e 64 28 30 29 3a 69 |H. .ext|end(0):i|
|000021c0| 6e 64 65 62 61 74 63 68 | 25 3d 30 0d 0d 52 18 20 |ndebatch|%=0..R. |
|000021d0| 20 f2 65 6e 64 62 61 74 | 63 68 28 66 75 6c 6c 62 | .endbat|ch(fullb|
|000021e0| 66 24 29 0d 0d 5c 05 cd | 0d 0d 66 05 e1 0d 0d 70 |f$)..\..|..f....p|
|000021f0| 04 0d 0d 7a 11 dd f2 63 | 61 6e 63 65 6c 62 61 74 |...z...c|ancelbat|
|00002200| 63 68 0d 0d 84 28 65 6f | 66 25 3d b9 3a 64 65 6c |ch...(eo|f%=.:del|
|00002210| 25 3d a3 3a f2 63 66 28 | 66 30 30 25 29 3a 69 6e |%=.:.cf(|f00%):in|
|00002220| 64 65 62 61 74 63 68 25 | 3d 30 0d 0d 8e 21 f2 6d |debatch%|=0...!.m|
|00002230| 65 73 73 61 67 65 30 28 | 22 44 63 61 6e 63 65 6c |essage0(|"Dcancel|
|00002240| 22 2c 30 29 3a f2 70 61 | 75 73 65 0d 0d 98 05 e1 |",0):.pa|use.....|
|00002250| 0d 0d a2 04 0d 0d ac 12 | dd f2 65 6e 64 62 61 74 |........|..endbat|
|00002260| 63 68 28 66 24 29 0d 0d | b6 2b ea 46 25 2c 6e 25 |ch(f$)..|.+.F%,n%|
|00002270| 2c 74 25 2c 64 65 62 64 | 69 72 24 2c 72 61 74 65 |,t%,debd|ir$,rate|
|00002280| 24 2c 6b 65 65 70 62 25 | 3a 72 61 74 65 24 3d 22 |$,keepb%|:rate$="|
|00002290| 22 0d 0d c0 24 f4 20 77 | 72 69 74 65 20 64 65 62 |"...$. w|rite deb|
|000022a0| 61 74 63 68 20 73 74 61 | 74 73 20 74 6f 20 6c 6f |atch sta|ts to lo|
|000022b0| 67 66 69 6c 65 0d 0d ca | 42 74 25 3d 94 28 64 73 |gfile...|Bt%=.(ds|
|000022c0| 74 69 6d 65 25 2d 74 69 | 6d 65 25 29 81 31 30 30 |time%-ti|me%).100|
|000022d0| 3a e7 74 25 3e 30 8c 72 | 61 74 65 24 3d c3 28 28 |:.t%>0.r|ate$=.((|
|000022e0| 6c 65 6e 25 2d 62 73 74 | 61 72 74 25 29 81 74 25 |len%-bst|art%).t%|
|000022f0| 29 2b 22 63 70 73 22 0d | 0d d4 5e f2 6c 6f 67 28 |)+"cps".|..^.log(|
|00002300| 22 46 69 6e 69 73 68 65 | 64 20 62 61 74 63 68 20 |"Finishe|d batch |
|00002310| 22 2b a4 6c 65 61 66 28 | 66 24 29 2b 22 20 22 2b |"+.leaf(|f$)+" "+|
|00002320| c3 74 6f 74 61 6c 25 2b | 22 20 61 72 74 73 20 22 |.total%+|" arts "|
|00002330| 2b c3 6c 65 6e 25 2b 22 | 20 62 79 74 65 73 20 22 |+.len%+"| bytes "|
|00002340| 2b 72 61 74 65 24 29 3a | f2 6c 6f 67 69 6e 64 65 |+rate$):|.loginde|
|00002350| 78 68 69 74 73 0d 0d de | 46 f2 63 66 28 66 30 30 |xhits...|F.cf(f00|
|00002360| 25 29 3a f4 20 62 61 74 | 63 68 20 66 69 6c 65 20 |%):. bat|ch file |
|00002370| 73 68 6f 75 6c 64 20 62 | 65 20 63 6c 6f 73 65 64 |should b|e closed|
|00002380| 20 61 6c 72 65 61 64 79 | 2c 20 62 75 74 20 74 68 | already|, but th|
|00002390| 69 73 20 65 6e 73 75 72 | 65 73 2e 0d 0d e8 15 f2 |is ensur|es......|
|000023a0| 63 68 61 6e 67 65 69 63 | 28 64 65 66 69 63 24 29 |changeic|(defic$)|
|000023b0| 0d 0d f2 1d e7 74 79 70 | 65 25 3c 3e 30 8c 61 72 |.....typ|e%<>0.ar|
|000023c0| 72 61 72 74 25 2b 3d 74 | 6f 74 61 6c 25 0d 0d fc |rart%+=t|otal%...|
|000023d0| 0f e7 63 61 6e 63 65 6c | 25 3d 30 8c 0d 0e 06 12 |..cancel|%=0.....|
|000023e0| 20 20 f2 73 61 76 65 67 | 72 70 64 61 74 61 0d 0e | .saveg|rpdata..|
|000023f0| 10 12 20 20 f2 64 65 6c | 5f 72 65 63 66 69 6c 65 |.. .del|_recfile|
|00002400| 0d 0e 1a 33 20 20 e7 74 | 79 70 65 25 3d 30 8c 6b |...3 .t|ype%=0.k|
|00002410| 65 65 70 62 25 3d 6b 65 | 65 70 6d 74 69 6d 65 25 |eepb%=ke|epmtime%|
|00002420| 3a 8b 6b 65 65 70 62 25 | 3d 6b 65 65 70 6e 74 69 |:.keepb%|=keepnti|
|00002430| 6d 65 25 0d 0e 24 2d 20 | 20 e7 6b 65 65 70 62 25 |me%..$- | .keepb%|
|00002440| 3e 30 84 64 65 6c 25 3d | 30 8c f2 6d 6f 76 65 74 |>0.del%=|0..movet|
|00002450| 6f 64 65 62 75 67 28 66 | 24 2c 74 79 70 65 25 29 |odebug(f|$,type%)|
|00002460| 0d 0e 2e 3d 20 20 e7 a4 | 66 6f 72 63 65 64 65 6c |...= ..|forcedel|
|00002470| 66 69 6c 65 28 66 24 29 | 3c 3e 30 8c f2 6d 65 73 |file(f$)|<>0..mes|
|00002480| 73 61 67 65 31 28 22 44 | 64 65 6c 66 61 69 6c 22 |sage1("D|delfail"|
|00002490| 2c a4 6c 65 61 66 28 66 | 24 29 2c 31 29 0d 0e 38 |,.leaf(f|$),1)..8|
|000024a0| 17 20 20 70 6f 73 74 66 | 65 74 63 68 72 65 61 64 |. postf|etchread|
|000024b0| 79 25 3d 31 0d 0e 42 05 | cd 0d 0e 4c 0b f2 61 72 |y%=1..B.|...L..ar|
|000024c0| 72 69 76 65 0d 0e 56 05 | e1 0d 0e 60 04 0d 0e 6a |rive..V.|...`...j|
|000024d0| 12 dd f2 6c 6f 67 69 6e | 64 65 78 68 69 74 73 0d |...login|dexhits.|
|000024e0| 0e 74 08 ea 70 63 25 0d | 0e 7e 13 e7 69 6e 64 65 |.t..pc%.|.~..inde|
|000024f0| 78 74 6f 74 61 6c 25 3e | 30 8c 0d 0e 88 26 20 20 |xtotal%>|0....& |
|00002500| 70 63 25 3d 28 69 6e 64 | 65 78 68 69 74 73 25 2a |pc%=(ind|exhits%*|
|00002510| 31 30 30 29 81 69 6e 64 | 65 78 74 6f 74 61 6c 25 |100).ind|extotal%|
|00002520| 0d 0e 92 4d 20 20 f2 6c | 6f 67 28 22 49 6e 64 65 |...M .l|og("Inde|
|00002530| 78 20 62 75 66 66 65 72 | 20 63 61 63 68 65 20 68 |x buffer| cache h|
|00002540| 69 74 73 20 3d 20 22 2b | c3 70 63 25 2b 22 25 20 |its = "+|.pc%+"% |
|00002550| 28 75 73 69 6e 67 20 22 | 2b c3 6e 69 62 75 66 25 |(using "|+.nibuf%|
|00002560| 2b 22 20 62 75 66 66 65 | 72 73 29 22 29 0d 0e 9c |+" buffe|rs)")...|
|00002570| 05 cd 0d 0e a6 05 e1 0d | 0e b0 04 0d 0e ba 1b dd |........|........|
|00002580| f2 6d 6f 76 65 74 6f 64 | 65 62 75 67 28 66 24 2c |.movetod|ebug(f$,|
|00002590| 74 79 70 65 25 29 0d 0e | c4 0d ea 46 25 2c 64 24 |type%)..|...F%,d$|
|000025a0| 2c 62 25 0d 0e ce 24 e7 | 74 79 70 65 25 3d 31 8c |,b%...$.|type%=1.|
|000025b0| 64 24 3d 62 61 64 6e 64 | 69 72 24 8b 64 24 3d 62 |d$=badnd|ir$.d$=b|
|000025c0| 61 64 6d 64 69 72 24 0d | 0e d8 12 f2 65 6e 73 75 |admdir$.|....ensu|
|000025d0| 72 65 64 69 72 28 64 24 | 29 0d 0e e2 17 64 24 3d |redir(d$|)....d$=|
|000025e0| 64 24 2b 22 2e 22 2b a4 | 6c 65 61 66 28 66 24 29 |d$+"."+.|leaf(f$)|
|000025f0| 0d 0e ec 12 f2 65 6e 73 | 75 72 65 64 69 72 28 64 |.....ens|uredir(d|
|00002600| 24 29 0d 0e f6 1f 3f 74 | 6d 70 25 3d 33 3a c8 99 |$)....?t|mp%=3:..|
|00002610| 22 4f 53 5f 57 6f 72 64 | 22 2c 31 34 2c 74 6d 70 |"OS_Word|",14,tmp|
|00002620| 25 0d 0f 00 4d c8 99 22 | 54 65 72 72 69 74 6f 72 |%...M.."|Territor|
|00002630| 79 5f 43 6f 6e 76 65 72 | 74 44 61 74 65 41 6e 64 |y_Conver|tDateAnd|
|00002640| 54 69 6d 65 22 2c 31 2c | 74 6d 70 25 2c 74 6d 70 |Time",1,|tmp%,tmp|
|00002650| 25 2b 31 32 38 2c 31 32 | 38 2c 22 25 4d 4e 25 44 |%+128,12|8,"%MN%D|
|00002660| 59 25 32 34 25 4d 49 25 | 53 45 22 b8 62 25 0d 0f |Y%24%MI%|SE".b%..|
|00002670| 0a 22 46 25 3d a4 72 65 | 6e 61 6d 65 28 66 24 2c |."F%=.re|name(f$,|
|00002680| 64 24 2b 22 2e 22 2b a4 | 73 74 72 28 62 25 29 29 |d$+"."+.|str(b%))|
|00002690| 0d 0f 14 05 e1 0d 0f 1e | 04 0d 0f 28 0c dd f2 61 |........|...(...a|
|000026a0| 72 72 69 76 65 0d 0f 32 | 07 ea 61 24 0d 0f 3c 0e |rrive..2|..a$..<.|
|000026b0| c8 8e 61 72 72 61 72 74 | 25 ca 0d 0f 46 1b 20 20 |..arrart|%...F. |
|000026c0| c9 30 3a 61 24 3d a4 6d | 73 67 30 28 22 4e 6f 6e |.0:a$=.m|sg0("Non|
|000026d0| 65 77 73 22 29 0d 0f 50 | 1d 20 20 c9 31 3a 61 24 |ews")..P|. .1:a$|
|000026e0| 3d a4 6d 73 67 30 28 22 | 4e 65 77 6e 65 77 73 31 |=.msg0("|Newnews1|
|000026f0| 22 29 0d 0f 5a 24 20 20 | 7f 3a 61 24 3d a4 6d 73 |")..Z$ |.:a$=.ms|
|00002700| 67 31 28 22 4e 65 77 6e | 65 77 73 22 2c c3 61 72 |g1("Newn|ews",.ar|
|00002710| 72 61 72 74 25 29 0d 0f | 64 05 cb 0d 0f 6e 23 f2 |rart%)..|d....n#.|
|00002720| 75 70 64 61 74 65 69 63 | 6f 6e 73 74 72 69 6e 67 |updateic|onstring|
|00002730| 28 61 72 72 69 76 65 25 | 2c 31 2c 61 24 29 0d 0f |(arrive%|,1,a$)..|
|00002740| 78 44 e7 61 72 72 6d 61 | 69 6c 24 3e 22 22 8c 61 |xD.arrma|il$>"".a|
|00002750| 24 3d a4 6d 73 67 31 28 | 22 4e 65 77 6d 61 69 6c |$=.msg1(|"Newmail|
|00002760| 22 2c c1 61 72 72 6d 61 | 69 6c 24 2c 32 29 29 8b |",.arrma|il$,2)).|
|00002770| 61 24 3d a4 6d 73 67 30 | 28 22 4e 6f 6d 61 69 6c |a$=.msg0|("Nomail|
|00002780| 22 29 0d 0f 82 28 f2 75 | 70 64 61 74 65 69 63 6f |")...(.u|pdateico|
|00002790| 6e 73 74 72 69 6e 67 28 | 61 72 72 69 76 65 25 2c |nstring(|arrive%,|
|000027a0| 32 2c c0 61 24 2c 34 38 | 29 29 0d 0f 8c 0c e7 61 |2,.a$,48|)).....a|
|000027b0| 6c 65 72 74 25 8c 0d 0f | 96 2d 20 20 e7 61 72 72 |lert%...|.- .arr|
|000027c0| 6d 61 69 6c 24 3e 22 22 | 84 28 61 72 72 61 72 74 |mail$>""|.(arrart|
|000027d0| 25 3e 30 80 61 6c 65 72 | 74 6e 65 77 73 25 3c 3e |%>0.aler|tnews%<>|
|000027e0| 30 29 8c 0d 0f a0 2b 20 | 20 20 20 f2 63 66 72 6f |0)....+ | .cfro|
|000027f0| 6e 74 28 61 72 72 69 76 | 65 25 2c 30 2c 30 29 3a |nt(arriv|e%,0,0):|
|00002800| e7 61 6c 65 72 74 62 65 | 65 70 25 8c ef 37 0d 0f |.alertbe|ep%..7..|
|00002810| aa 07 20 20 cd 0d 0f b4 | 05 cd 0d 0f be 05 e1 0d |.. ....|........|
|00002820| 0f c8 04 0d 0f d2 11 dd | f2 73 61 76 65 67 72 70 |........|.savegrp|
|00002830| 64 61 74 61 0d 0f dc 10 | e7 73 74 61 72 74 75 70 |data....|.startup|
|00002840| 6f 6b 25 8c 0d 0f e6 13 | 20 20 f2 77 72 69 74 65 |ok%.....| .write|
|00002850| 67 72 70 64 61 74 61 0d | 0f f0 13 20 20 f2 77 72 |grpdata.|... .wr|
|00002860| 69 74 65 69 6e 64 65 78 | 65 73 0d 0f fa 15 20 20 |iteindex|es.... |
|00002870| f2 61 64 64 64 65 6c 62 | 75 66 28 30 2c 30 29 0d |.adddelb|uf(0,0).|
|00002880| 10 04 05 cd 0d 10 0e 05 | e1 0d 10 18 04 0d 10 22 |........|......."|
|00002890| 14 dd f2 64 6f 61 72 74 | 69 63 6c 65 28 62 66 24 |...doart|icle(bf$|
|000028a0| 29 0d 10 2c 0b ea 6c 69 | 6e 65 73 25 0d 10 36 22 |)..,..li|nes%..6"|
|000028b0| f2 65 78 74 65 6e 64 28 | 69 6e 62 75 66 73 69 7a |.extend(|inbufsiz|
|000028c0| 65 25 2b 64 65 66 61 72 | 74 62 75 66 25 29 0d 10 |e%+defar|tbuf%)..|
|000028d0| 40 10 f2 63 6c 65 61 72 | 68 65 61 64 65 72 0d 10 |@..clear|header..|
|000028e0| 4a 1c 6f 75 74 67 25 28 | 29 3d 30 3a 70 74 72 25 |J.outg%(|)=0:ptr%|
|000028f0| 3d 30 3a 6f 75 74 24 3d | 22 22 0d 10 54 35 6e 65 |=0:out$=|""..T5ne|
|00002900| 78 74 61 72 74 70 6f 73 | 25 3d 70 6f 73 25 2b 74 |xtartpos|%=pos%+t|
|00002910| 68 69 73 61 72 74 6c 65 | 6e 25 2d 31 30 30 3a 74 |hisartle|n%-100:t|
|00002920| 68 69 73 61 72 74 70 6f | 73 25 3d 70 6f 73 25 0d |hisartpo|s%=pos%.|
|00002930| 10 5e 32 e7 c0 6c 69 6e | 65 24 2c 73 65 70 6c 65 |.^2..lin|e$,seple|
|00002940| 6e 25 29 3d 73 65 70 24 | 80 73 65 70 24 3c 3e 22 |n%)=sep$|.sep$<>"|
|00002950| 46 72 6f 6d 20 22 8c 64 | 69 73 63 61 72 64 25 3d |From ".d|iscard%=|
|00002960| b9 0d 10 68 15 c8 95 6c | 69 6e 65 24 3e 22 22 80 |...h...l|ine$>"".|
|00002970| 65 6f 66 25 3d 30 0d 10 | 72 1c 20 20 f2 68 65 61 |eof%=0..|r. .hea|
|00002980| 64 65 72 6c 69 6e 65 28 | 6c 69 6e 65 24 2c 62 66 |derline(|line$,bf|
|00002990| 24 29 0d 10 7c 2e 20 20 | e7 64 69 73 63 61 72 64 |$)..|. |.discard|
|000029a0| 25 3d 30 8c f2 61 64 64 | 74 6f 62 75 66 66 65 72 |%=0..add|tobuffer|
|000029b0| 28 6c 69 6e 65 24 29 8b | f2 64 69 73 63 61 72 64 |(line$).|.discard|
|000029c0| 0d 10 86 14 20 20 6c 69 | 6e 65 24 3d a4 67 65 74 |.... li|ne$=.get|
|000029d0| 6c 69 6e 65 0d 10 90 05 | ce 0d 10 9a 28 e7 74 68 |line....|....(.th|
|000029e0| 69 73 61 72 74 6c 65 6e | 25 3e 30 8c f2 62 6c 6f |isartlen|%>0..blo|
|000029f0| 63 6b 6d 6f 76 65 3a f2 | 62 61 74 63 68 70 6f 6c |ckmove:.|batchpol|
|00002a00| 6c 0d 10 a4 05 f5 0d 10 | ae 25 20 20 e7 64 69 73 |l.......|.% .dis|
|00002a10| 63 61 72 64 25 3d 30 8c | f2 61 64 64 74 6f 62 75 |card%=0.|.addtobu|
|00002a20| 66 66 65 72 28 6c 69 6e | 65 24 29 0d 10 b8 36 20 |ffer(lin|e$)...6 |
|00002a30| 20 6c 69 6e 65 24 3d a4 | 67 65 74 6c 69 6e 65 3a | line$=.|getline:|
|00002a40| 6c 69 6e 65 73 25 2b 3d | 31 3a e7 6c 69 6e 65 73 |lines%+=|1:.lines|
|00002a50| 25 83 32 30 3d 30 8c f2 | 62 61 74 63 68 70 6f 6c |%.20=0..|batchpol|
|00002a60| 6c 0d 10 c2 33 fd 28 70 | 6f 73 25 3e 6e 65 78 74 |l...3.(p|os%>next|
|00002a70| 61 72 74 70 6f 73 25 80 | 28 c0 6c 69 6e 65 24 2c |artpos%.|(.line$,|
|00002a80| 73 65 70 6c 65 6e 25 29 | 3d 73 65 70 24 29 29 84 |seplen%)|=sep$)).|
|00002a90| 65 6f 66 25 0d 10 cc 3c | e7 c0 6c 69 6e 65 24 2c |eof%...<|..line$,|
|00002aa0| 34 29 3d 22 23 21 20 72 | 22 8c 74 68 69 73 61 72 |4)="#! r|".thisar|
|00002ab0| 74 6c 65 6e 25 3d bb c1 | 6c 69 6e 65 24 2c 31 30 |tlen%=..|line$,10|
|00002ac0| 29 3a 8b 74 68 69 73 61 | 72 74 6c 65 6e 25 3d 30 |):.thisa|rtlen%=0|
|00002ad0| 0d 10 d6 0d 74 6f 74 61 | 6c 25 2b 3d 31 0d 10 e0 |....tota|l%+=1...|
|00002ae0| 2c e7 74 6f 74 61 6c 25 | 83 33 30 3d 30 80 66 61 |,.total%|.30=0.fa|
|00002af0| 73 74 25 3d 30 8c f2 77 | 72 69 74 65 5f 72 65 63 |st%=0..w|rite_rec|
|00002b00| 66 69 6c 65 28 62 66 24 | 29 0d 10 ea 05 e1 0d 10 |file(bf$|).......|
|00002b10| f4 04 0d 10 fe 1b dd f2 | 68 65 61 64 65 72 6c 69 |........|headerli|
|00002b20| 6e 65 28 6c 69 6e 65 24 | 2c 62 66 24 29 0d 11 08 |ne(line$|,bf$)...|
|00002b30| 07 ea 68 25 0d 11 12 1b | 68 25 3d a4 73 65 74 68 |..h%....|h%=.seth|
|00002b40| 65 61 64 65 72 76 61 72 | 28 6c 69 6e 65 24 29 0d |eadervar|(line$).|
|00002b50| 11 1c 1e e7 68 25 3d 32 | 32 8c f2 61 64 64 75 73 |....h%=2|2..addus|
|00002b60| 74 6f 70 61 74 68 28 6c | 69 6e 65 24 29 0d 11 26 |topath(l|ine$)..&|
|00002b70| 38 e7 28 6f 75 74 67 25 | 28 30 29 3d 30 80 74 79 |8.(outg%|(0)=0.ty|
|00002b80| 70 65 25 3d 30 29 84 68 | 25 3d 31 31 8c f2 6d 61 |pe%=0).h|%=11..ma|
|00002b90| 6b 65 73 61 76 65 6c 69 | 73 74 28 6c 69 6e 65 24 |kesaveli|st(line$|
|00002ba0| 2c 62 66 24 29 0d 11 30 | 05 e1 0d 11 3a 04 0d 11 |,bf$)..0|....:...|
|00002bb0| 44 0d dd f2 64 69 73 63 | 61 72 64 0d 11 4e 1d ea |D...disc|ard..N..|
|00002bc0| 41 24 3a c8 95 6c 6f 6e | 67 25 3a 41 24 3d a4 67 |A$:..lon|g%:A$=.g|
|00002bd0| 65 74 6c 69 6e 65 3a ce | 0d 11 58 05 e1 0d 11 62 |etline:.|..X....b|
|00002be0| 04 0d 11 6c 0f dd f2 62 | 61 74 63 68 70 6f 6c 6c |...l...b|atchpoll|
|00002bf0| 0d 11 76 3e f2 70 6f 6c | 6c 28 73 6c 69 63 65 25 |..v>.pol|l(slice%|
|00002c00| 29 3a e7 94 28 74 69 6d | 65 25 2d 62 63 72 6f 6e |):..(tim|e%-bcron|
|00002c10| 25 29 3e 32 30 30 8c f2 | 75 70 64 61 74 65 70 6f |%)>200..|updatepo|
|00002c20| 73 3a 62 63 72 6f 6e 25 | 3d 74 69 6d 65 25 0d 11 |s:bcron%|=time%..|
|00002c30| 80 05 e1 0d 11 8a 04 0d | 11 94 0f dd f2 62 6c 6f |........|.....blo|
|00002c40| 63 6b 6d 6f 76 65 0d 11 | 9e 0d ea 6c 25 2c 46 25 |ckmove..|...l%,F%|
|00002c50| 2c 6d 25 0d 11 a8 23 6c | 25 3d 74 68 69 73 61 72 |,m%...#l|%=thisar|
|00002c60| 74 6c 65 6e 25 2b 74 68 | 69 73 61 72 74 70 6f 73 |tlen%+th|isartpos|
|00002c70| 25 2d 70 6f 73 25 0d 11 | b2 1e e7 62 75 66 70 74 |%-pos%..|...bufpt|
|00002c80| 72 25 2b 6c 25 2b 34 3c | 3d 69 6e 62 75 66 73 69 |r%+l%+4<|=inbufsi|
|00002c90| 7a 65 25 8c 0d 11 bc 1a | 20 20 6d 25 3d 69 6e 62 |ze%.....| m%=inb|
|00002ca0| 75 66 25 2b 62 75 66 70 | 74 72 25 2b 6c 25 0d 11 |uf%+bufp|tr%+l%..|
|00002cb0| c6 2f 20 20 f4 20 63 68 | 65 63 6b 20 66 6f 72 20 |./ . ch|eck for |
|00002cc0| 22 23 21 20 72 22 20 77 | 69 74 68 6f 75 74 20 72 |"#! r" w|ithout r|
|00002cd0| 65 61 64 69 6e 67 20 73 | 74 72 69 6e 67 0d 11 d0 |eading s|tring...|
|00002ce0| 2f 20 20 f4 20 28 62 75 | 66 66 65 72 20 6f 76 65 |/ . (bu|ffer ove|
|00002cf0| 72 72 75 6e 20 2d 3e 20 | 70 6f 73 73 69 62 6c 65 |rrun -> |possible|
|00002d00| 20 64 61 74 61 20 61 62 | 6f 72 74 29 0d 11 da 16 | data ab|ort)....|
|00002d10| 20 20 e7 21 6d 25 3d 26 | 37 32 32 30 32 31 32 33 | .!m%=&|72202123|
|00002d20| 20 8c 0d 11 e4 3e 20 20 | 20 20 e7 70 74 72 25 2b | ....> | .ptr%+|
|00002d30| 6c 25 3e 62 75 66 73 69 | 7a 65 25 8c f2 65 78 74 |l%>bufsi|ze%..ext|
|00002d40| 65 6e 64 28 69 6e 62 75 | 66 73 69 7a 65 25 2b 62 |end(inbu|fsize%+b|
|00002d50| 75 66 73 69 7a 65 25 2b | 6c 25 2b 31 30 32 34 29 |ufsize%+|l%+1024)|
|00002d60| 0d 11 ee 23 20 20 20 20 | f2 61 64 64 74 6f 62 75 |...# |.addtobu|
|00002d70| 66 66 65 72 28 22 22 29 | 3a 64 69 73 63 61 72 64 |ffer("")|:discard|
|00002d80| 25 3d b9 0d 11 f8 4f 20 | 20 20 20 c8 99 22 58 57 |%=....O | .."XW|
|00002d90| 69 6d 70 5f 54 72 61 6e | 73 66 65 72 42 6c 6f 63 |imp_Tran|sferBloc|
|00002da0| 6b 22 2c 74 61 73 6b 25 | 2c 69 6e 62 75 66 25 2b |k",task%|,inbuf%+|
|00002db0| 62 75 66 70 74 72 25 2c | 74 61 73 6b 25 2c 61 72 |bufptr%,|task%,ar|
|00002dc0| 74 62 61 73 65 25 2b 70 | 74 72 25 2c 6c 25 b8 3b |tbase%+p|tr%,l%.;|
|00002dd0| 46 25 0d 12 02 2f 20 20 | 20 20 e7 28 46 25 80 31 |F%.../ | .(F%.1|
|00002de0| 29 3d 30 8c 70 6f 73 25 | 2b 3d 6c 25 3a 70 74 72 |)=0.pos%|+=l%:ptr|
|00002df0| 25 2b 3d 6c 25 3a 62 75 | 66 70 74 72 25 2b 3d 6c |%+=l%:bu|fptr%+=l|
|00002e00| 25 0d 12 0c 07 20 20 cd | 0d 12 16 05 cd 0d 12 20 |%.... .|....... |
|00002e10| 05 e1 0d 12 2a 04 0d 12 | 34 11 dd f2 63 6c 65 61 |....*...|4...clea|
|00002e20| 72 68 65 61 64 65 72 0d | 12 3e 4f 74 6f 24 3d 22 |rheader.|.>Oto$="|
|00002e30| 3c 62 6c 61 6e 6b 3e 22 | 3a 66 72 6f 6d 24 3d 22 |<blank>"|:from$="|
|00002e40| 28 6e 6f 20 73 65 6e 64 | 65 72 29 22 3a 73 75 62 |(no send|er)":sub|
|00002e50| 6a 65 63 74 24 3d 22 28 | 6e 6f 20 73 75 62 6a 65 |ject$="(|no subje|
|00002e60| 63 74 29 22 3a 63 63 24 | 3d 22 22 3a 6f 72 69 67 |ct)":cc$|="":orig|
|00002e70| 74 6f 24 3d 22 22 0d 12 | 48 4f 6d 65 73 73 69 64 |to$=""..|HOmessid|
|00002e80| 24 3d 22 3c 30 3e 22 3a | 6e 65 77 73 67 72 6f 75 |$="<0>":|newsgrou|
|00002e90| 70 24 3d 22 22 3a 65 78 | 70 69 72 65 73 25 3d 30 |p$="":ex|pires%=0|
|00002ea0| 3a 61 72 74 64 61 74 65 | 25 3d 30 3a 73 75 70 65 |:artdate|%=0:supe|
|00002eb0| 72 73 65 64 65 24 3d 22 | 22 3a 63 6f 6e 74 72 6f |rsede$="|":contro|
|00002ec0| 6c 24 3d 22 22 0d 12 52 | 4e 72 65 63 65 69 70 74 |l$=""..R|Nreceipt|
|00002ed0| 24 3d 22 22 3a 6c 61 73 | 74 68 25 3d 30 3a 70 72 |$="":las|th%=0:pr|
|00002ee0| 65 63 65 64 65 6e 63 65 | 24 3d 22 22 3a 72 65 70 |ecedence|$="":rep|
|00002ef0| 6c 79 74 6f 24 3d 22 22 | 3a 61 70 70 72 6f 76 65 |lyto$=""|:approve|
|00002f00| 64 24 3d 22 22 3a 72 65 | 66 65 72 65 6e 63 65 24 |d$="":re|ference$|
|00002f10| 3d 22 22 0d 12 5c 27 69 | 6e 72 65 70 6c 79 74 6f |=""..\'i|nreplyto|
|00002f20| 24 3d 22 22 3a 64 69 73 | 74 72 69 62 24 3d 22 22 |$="":dis|trib$=""|
|00002f30| 3a 68 70 61 74 68 24 3d | 22 22 0d 12 66 05 e1 0d |:hpath$=|""..f...|
|00002f40| 12 70 04 0d 12 7a 16 dd | a4 73 65 74 68 65 61 64 |.p...z..|.sethead|
|00002f50| 65 72 76 61 72 28 41 24 | 29 0d 12 84 0e ea 6e 6f |ervar(A$|).....no|
|00002f60| 25 2c 73 25 2c 42 24 0d | 12 8e 15 d6 68 65 61 64 |%,s%,B$.|....head|
|00002f70| 65 72 6e 6f 25 2c 41 24 | 2c 6e 6f 25 0d 12 98 34 |erno%,A$|,no%...4|
|00002f80| e7 6e 6f 25 8c 73 25 3d | a7 41 24 2c 22 3a 22 29 |.no%.s%=|.A$,":")|
|00002f90| 2b 32 3a 42 24 3d a4 63 | 6c 65 61 6e 28 c1 41 24 |+2:B$=.c|lean(.A$|
|00002fa0| 2c 73 25 29 29 3a 6c 61 | 73 74 68 25 3d 6e 6f 25 |,s%)):la|sth%=no%|
|00002fb0| 0d 12 a2 0a c8 8e 6e 6f | 25 ca 0d 12 ac 14 20 20 |......no|%..... |
|00002fc0| c9 31 3a 73 75 62 6a 65 | 63 74 24 3d 42 24 0d 12 |.1:subje|ct$=B$..|
|00002fd0| b6 11 20 20 c9 32 3a 66 | 72 6f 6d 24 3d 42 24 0d |.. .2:f|rom$=B$.|
|00002fe0| 12 c0 13 20 20 c9 33 3a | 6d 65 73 73 69 64 24 3d |... .3:|messid$=|
|00002ff0| 42 24 0d 12 ca 16 20 20 | c9 34 3a 73 75 70 65 72 |B$.... |.4:super|
|00003000| 73 65 64 65 24 3d 42 24 | 0d 12 d4 21 20 20 c9 35 |sede$=B$|...! .5|
|00003010| 3a 65 78 70 69 72 65 73 | 25 3d a4 64 65 63 6f 64 |:expires|%=.decod|
|00003020| 65 64 61 74 65 28 42 24 | 29 0d 12 de 14 20 20 c9 |edate(B$|).... .|
|00003030| 36 3a 63 6f 6e 74 72 6f | 6c 24 3d 42 24 0d 12 e8 |6:contro|l$=B$...|
|00003040| 23 20 20 c9 37 3a f4 61 | 72 74 64 61 74 65 25 3d |# .7:.a|rtdate%=|
|00003050| 46 4e 64 65 63 6f 64 65 | 64 61 74 65 28 42 24 29 |FNdecode|date(B$)|
|00003060| 0d 12 f2 13 20 20 c9 38 | 3a 64 69 73 63 61 72 64 |.... .8|:discard|
|00003070| 25 3d b9 0d 12 fc 17 20 | 20 c9 39 3a e7 74 6f 24 |%=..... | .9:.to$|
|00003080| 3d 22 22 8c 74 6f 24 3d | 42 24 0d 13 06 10 20 20 |="".to$=|B$.... |
|00003090| c9 31 30 3a 74 6f 24 3d | 42 24 0d 13 10 17 20 20 |.10:to$=|B$.... |
|000030a0| c9 31 31 3a 6e 65 77 73 | 67 72 6f 75 70 24 3d 42 |.11:news|group$=B|
|000030b0| 24 0d 13 1a 15 20 20 c9 | 31 32 3a 72 65 63 65 69 |$.... .|12:recei|
|000030c0| 70 74 24 3d 42 24 0d 13 | 24 18 20 20 c9 31 33 3a |pt$=B$..|$. .13:|
|000030d0| 70 72 65 63 65 64 65 6e | 63 65 24 3d 42 24 0d 13 |preceden|ce$=B$..|
|000030e0| 2e 15 20 20 c9 31 34 3a | 72 65 70 6c 79 74 6f 24 |.. .14:|replyto$|
|000030f0| 3d 42 24 0d 13 38 16 20 | 20 c9 31 35 3a 61 70 70 |=B$..8. | .15:app|
|00003100| 72 6f 76 65 64 24 3d 42 | 24 0d 13 42 4b 20 20 c9 |roved$=B|$..BK .|
|00003110| 31 36 3a f4 50 52 4f 43 | 61 64 64 74 6f 62 75 66 |16:.PROC|addtobuf|
|00003120| 66 65 72 28 41 24 29 3a | 64 69 73 63 61 72 64 25 |fer(A$):|discard%|
|00003130| 3d 54 52 55 45 3a 6c 69 | 6e 65 24 3d 22 22 3a 52 |=TRUE:li|ne$="":R|
|00003140| 45 4d 20 22 4d 65 73 73 | 61 67 65 3a 22 20 68 65 |EM "Mess|age:" he|
|00003150| 61 64 65 72 0d 13 4c 17 | 20 20 c9 31 37 3a 72 65 |ader..L.| .17:re|
|00003160| 66 65 72 65 6e 63 65 24 | 3d 42 24 0d 13 56 10 20 |ference$|=B$..V. |
|00003170| 20 c9 31 38 3a 63 63 24 | 3d 42 24 0d 13 60 3d 20 | .18:cc$|=B$..`= |
|00003180| 20 c9 31 39 3a e7 73 75 | 70 65 72 73 65 64 65 24 | .19:.su|persede$|
|00003190| 3d 22 22 80 63 6c 61 72 | 69 25 8c e7 a7 42 24 2c |="".clar|i%...B$,|
|000031a0| 22 63 6c 61 72 69 22 29 | 3e 30 8c 73 75 70 65 72 |"clari")|>0.super|
|000031b0| 73 65 64 65 24 3d 42 24 | 0d 13 6a 17 20 20 c9 32 |sede$=B$|..j. .2|
|000031c0| 30 3a f2 72 63 6f 6d 6d | 61 6e 64 28 42 24 29 0d |0:.rcomm|and(B$).|
|000031d0| 13 74 17 20 20 c9 32 31 | 3a 69 6e 72 65 70 6c 79 |.t. .21|:inreply|
|000031e0| 74 6f 24 3d 42 24 0d 13 | 7e 13 20 20 c9 32 32 3a |to$=B$..|~. .22:|
|000031f0| 68 70 61 74 68 24 3d 42 | 24 0d 13 88 15 20 20 c9 |hpath$=B|$.... .|
|00003200| 32 33 3a 64 69 73 74 72 | 69 62 24 3d 42 24 0d 13 |23:distr|ib$=B$..|
|00003210| 92 2e 20 20 7f 3a e7 97 | 41 24 3c 33 33 8c f2 63 |.. .:..|A$<33..c|
|00003220| 6f 6e 74 68 6c 69 6e 65 | 28 41 24 2c 6c 61 73 74 |onthline|(A$,last|
|00003230| 68 25 29 8b 6c 61 73 74 | 68 25 3d 30 0d 13 9c 05 |h%).last|h%=0....|
|00003240| cb 0d 13 a6 08 3d 6e 6f | 25 0d 13 b0 04 0d 13 ba |.....=no|%.......|
|00003250| 16 dd f2 63 6f 6e 74 68 | 6c 69 6e 65 28 61 24 2c |...conth|line(a$,|
|00003260| 74 25 29 0d 13 c4 09 c8 | 8e 74 25 ca 0d 13 ce 1f |t%).....|.t%.....|
|00003270| 20 20 c9 31 30 3a e7 a9 | 74 6f 24 2b a9 61 24 3c | .10:..|to$+.a$<|
|00003280| 32 35 30 8c 74 6f 24 2b | 3d 61 24 0d 13 d8 2d 20 |250.to$+|=a$...- |
|00003290| 20 c9 31 37 3a e7 a9 72 | 65 66 65 72 65 6e 63 65 | .17:..r|eference|
|000032a0| 24 2b a9 61 24 3c 32 35 | 30 8c 72 65 66 65 72 65 |$+.a$<25|0.refere|
|000032b0| 6e 63 65 24 2b 3d 61 24 | 0d 13 e2 1f 20 20 c9 31 |nce$+=a$|.... .1|
|000032c0| 38 3a e7 a9 63 63 24 2b | a9 61 24 3c 32 35 30 8c |8:..cc$+|.a$<250.|
|000032d0| 63 63 24 2b 3d 61 24 0d | 13 ec 17 20 20 c9 32 30 |cc$+=a$.|... .20|
|000032e0| 3a f2 72 63 6f 6d 6d 61 | 6e 64 28 61 24 29 0d 13 |:.rcomma|nd(a$)..|
|000032f0| f6 05 cb 0d 14 00 05 e1 | 0d 14 0a 04 0d 14 14 21 |........|.......!|
|00003300| dd a4 69 64 65 6e 74 69 | 66 79 66 69 6c 65 28 66 |..identi|fyfile(f|
|00003310| 69 6c 65 24 2c 6f 66 66 | 73 65 74 25 29 0d 14 1e |ile$,off|set%)...|
|00003320| 23 ea 74 25 2c 6c 63 25 | 2c 63 6c 75 65 25 2c 61 |#.t%,lc%|,clue%,a|
|00003330| 24 3a 74 25 3d 2d 31 3a | 63 6c 75 65 25 3d 2d 31 |$:t%=-1:|clue%=-1|
|00003340| 0d 14 28 05 f5 0d 14 32 | 14 20 20 6c 69 6e 65 24 |..(....2|. line$|
|00003350| 3d a4 67 65 74 6c 69 6e | 65 0d 14 3c 31 20 20 6c |=.getlin|e..<1 l|
|00003360| 63 25 2b 3d 31 3a 6c 69 | 6e 65 24 3d a4 63 6c 65 |c%+=1:li|ne$=.cle|
|00003370| 61 6e 28 6c 69 6e 65 24 | 29 3a 61 24 3d a4 6c 6f |an(line$|):a$=.lo|
|00003380| 77 65 72 28 6c 69 6e 65 | 24 29 0d 14 46 28 20 20 |wer(line|$)..F( |
|00003390| e7 97 28 6c 69 6e 65 24 | 29 3d 31 8c 74 25 3d 30 |..(line$|)=1.t%=0|
|000033a0| 3a 73 65 70 24 3d bd 31 | 3a 69 64 65 6e 74 24 3d |:sep$=.1|:ident$=|
|000033b0| 22 22 0d 14 50 34 20 20 | e7 c0 6c 69 6e 65 24 2c |""..P4 |..line$,|
|000033c0| 35 29 3d 22 46 72 6f 6d | 20 22 8c 74 25 3d 30 3a |5)="From| ".t%=0:|
|000033d0| 73 65 70 24 3d 22 46 72 | 6f 6d 20 22 3a 69 64 65 |sep$="Fr|om ":ide|
|000033e0| 6e 74 24 3d 22 22 0d 14 | 5a 52 20 20 e7 c0 6c 69 |nt$=""..|ZR ..li|
|000033f0| 6e 65 24 2c 38 29 3d 22 | 23 21 20 72 6d 61 69 6c |ne$,8)="|#! rmail|
|00003400| 22 8c 74 25 3d 30 3a 73 | 65 70 24 3d 22 23 21 20 |".t%=0:s|ep$="#! |
|00003410| 72 6d 61 69 6c 22 3a 69 | 64 65 6e 74 24 3d 22 22 |rmail":i|dent$=""|
|00003420| 3a 74 68 69 73 61 72 74 | 6c 65 6e 25 3d bb c1 6c |:thisart|len%=..l|
|00003430| 69 6e 65 24 2c 31 30 29 | 0d 14 64 5d 20 20 e7 c0 |ine$,10)|..d] ..|
|00003440| 6c 69 6e 65 24 2c 38 29 | 3d 22 23 21 20 72 6e 65 |line$,8)|="#! rne|
|00003450| 77 73 22 8c 74 25 3d 31 | 3a 73 65 70 24 3d 22 23 |ws".t%=1|:sep$="#|
|00003460| 21 20 72 6e 65 77 73 22 | 3a 69 64 65 6e 74 24 3d |! rnews"|:ident$=|
|00003470| 22 4e 65 77 73 67 72 6f | 75 70 73 3a 22 3a 74 68 |"Newsgro|ups:":th|
|00003480| 69 73 61 72 74 6c 65 6e | 25 3d bb c1 6c 69 6e 65 |isartlen|%=..line|
|00003490| 24 2c 31 30 29 0d 14 6e | 42 20 20 e7 c0 61 24 2c |$,10)..n|B ..a$,|
|000034a0| 31 31 29 3d 22 6e 65 77 | 73 67 72 6f 75 70 73 3a |11)="new|sgroups:|
|000034b0| 22 84 c0 61 24 2c 35 29 | 3d 22 78 72 65 66 3a 22 |"..a$,5)|="xref:"|
|000034c0| 84 c0 61 24 2c 35 29 3d | 22 70 61 74 68 3a 22 8c |..a$,5)=|"path:".|
|000034d0| 63 6c 75 65 25 3d 31 0d | 14 78 35 20 20 e7 c0 61 |clue%=1.|.x5 ..a|
|000034e0| 24 2c 34 29 3d 22 74 6f | 3a 20 22 84 c0 61 24 2c |$,4)="to|: "..a$,|
|000034f0| 31 34 29 3d 22 61 70 70 | 61 72 65 6e 74 6c 79 2d |14)="app|arently-|
|00003500| 74 6f 3a 22 8c 63 6c 75 | 65 25 3d 30 0d 14 82 12 |to:".clu|e%=0....|
|00003510| fd 74 25 3e 3d 30 84 65 | 6f 66 25 3c 3e 30 0d 14 |.t%>=0.e|of%<>0..|
|00003520| 8c 0a e7 74 25 3c 30 8c | 0d 14 96 2f 20 20 74 25 |...t%<0.|.../ t%|
|00003530| 3d 31 3a 73 65 70 24 3d | 22 23 21 20 72 6e 65 77 |=1:sep$=|"#! rnew|
|00003540| 73 22 3a 69 64 65 6e 74 | 24 3d 22 4e 65 77 73 67 |s":ident|$="Newsg|
|00003550| 72 6f 75 70 73 3a 22 0d | 14 a0 2a 20 20 e7 63 6c |roups:".|..* .cl|
|00003560| 75 65 25 3d 30 8c 74 25 | 3d 30 3a 73 65 70 24 3d |ue%=0.t%|=0:sep$=|
|00003570| 22 46 72 6f 6d 20 22 3a | 69 64 65 6e 74 24 3d 22 |"From ":|ident$="|
|00003580| 22 0d 14 aa 05 cd 0d 14 | b4 2a e7 6c 63 25 3e 31 |".......|.*.lc%>1|
|00003590| 8c f2 72 65 73 74 61 72 | 74 62 61 74 63 68 28 66 |..restar|tbatch(f|
|000035a0| 69 6c 65 24 2c 74 25 2c | 6f 66 66 73 65 74 25 29 |ile$,t%,|offset%)|
|000035b0| 0d 14 be 11 73 65 70 6c | 65 6e 25 3d a9 73 65 70 |....sepl|en%=.sep|
|000035c0| 24 0d 14 c8 07 3d 74 25 | 0d 14 d2 04 0d 14 dc 1d |$....=t%|........|
|000035d0| dd f2 6d 61 6b 65 73 61 | 76 65 6c 69 73 74 28 6c |..makesa|velist(l|
|000035e0| 69 6e 65 24 2c 62 66 24 | 29 0d 14 e6 0a ea 75 25 |ine$,bf$|).....u%|
|000035f0| 2c 75 24 0d 14 f0 0d e7 | 74 79 70 65 25 3d 31 8c |,u$.....|type%=1.|
|00003600| 0d 14 fa 30 20 20 f2 61 | 64 64 68 65 61 64 65 72 |...0 .a|ddheader|
|00003610| 74 6f 62 75 66 66 65 72 | 28 6c 69 6e 65 24 2c 6c |tobuffer|(line$,l|
|00003620| 6f 6e 67 25 29 3a 64 69 | 73 63 61 72 64 25 3d b9 |ong%):di|scard%=.|
|00003630| 0d 15 04 2f 20 20 6f 75 | 74 67 25 28 29 3d 30 3a |.../ ou|tg%()=0:|
|00003640| f2 67 72 6f 75 70 73 6c | 69 6e 65 28 6e 65 77 73 |.groupsl|ine(news|
|00003650| 67 72 6f 75 70 24 29 3a | f2 64 6f 78 72 65 66 0d |group$):|.doxref.|
|00003660| 15 0e 07 20 20 cc 0d 15 | 18 38 20 20 f4 20 77 6f |... ...|.8 . wo|
|00003670| 72 6b 20 6f 75 74 20 63 | 6f 72 72 65 63 74 20 75 |rk out c|orrect u|
|00003680| 73 65 72 6e 61 6d 65 20 | 66 72 6f 6d 20 62 61 74 |sername |from bat|
|00003690| 63 68 20 66 69 6c 65 6e | 61 6d 65 2e 2e 2e 0d 15 |ch filen|ame.....|
|000036a0| 22 1b 20 20 75 24 3d 62 | 66 24 3a 75 25 3d a4 75 |". u$=b|f$:u%=.u|
|000036b0| 73 65 72 6e 6f 28 75 24 | 29 0d 15 2c 2f 20 20 e7 |serno(u$|)..,/ .|
|000036c0| 75 25 3d 30 8c 75 24 3d | a4 74 6f 70 6f 73 74 6d |u%=0.u$=|.topostm|
|000036d0| 61 73 74 65 72 28 75 24 | 29 3a 75 25 3d a4 75 73 |aster(u$|):u%=.us|
|000036e0| 65 72 6e 6f 28 75 24 29 | 0d 15 36 6a 20 20 e7 75 |erno(u$)|..6j .u|
|000036f0| 61 6c 25 28 75 25 29 80 | 75 6e 61 6d 65 24 28 75 |al%(u%).|uname$(u|
|00003700| 25 29 3e 22 22 8c f2 6c | 6f 67 28 22 61 6c 69 61 |%)>""..l|og("alia|
|00003710| 73 20 72 65 64 69 72 65 | 63 74 69 6f 6e 20 22 2b |s redire|ction "+|
|00003720| 75 24 2b 22 20 74 6f 20 | 22 2b 75 6e 61 6d 65 24 |u$+" to |"+uname$|
|00003730| 28 75 25 29 29 3a 75 24 | 3d 75 6e 61 6d 65 24 28 |(u%)):u$|=uname$(|
|00003740| 75 25 29 3a 75 25 3d a4 | 75 73 65 72 6e 6f 28 75 |u%):u%=.|userno(u|
|00003750| 24 29 0d 15 40 20 20 20 | e7 75 25 3d 30 8c 75 24 |$)..@ |.u%=0.u$|
|00003760| 3d a4 74 6f 70 6f 73 74 | 6d 61 73 74 65 72 28 75 |=.topost|master(u|
|00003770| 24 29 0d 15 4a 2c 20 20 | 75 25 3d 30 3a 75 25 3d |$)..J, |u%=0:u%=|
|00003780| a4 61 64 64 74 6f 73 61 | 76 65 6c 69 73 74 28 22 |.addtosa|velist("|
|00003790| 45 6d 61 69 6c 2e 22 2b | 75 24 2c 75 25 29 0d 15 |Email."+|u$,u%)..|
|000037a0| 54 05 cd 0d 15 5e 05 e1 | 0d 15 68 04 0d 15 72 16 |T....^..|..h...r.|
|000037b0| dd a4 74 6f 70 6f 73 74 | 6d 61 73 74 65 72 28 75 |..topost|master(u|
|000037c0| 24 29 0d 15 7c 3a f2 6c | 6f 67 28 22 6e 6f 20 73 |$)..|:.l|og("no s|
|000037d0| 75 63 68 20 75 73 65 72 | 20 22 2b 75 24 2b 22 2c |uch user| "+u$+",|
|000037e0| 20 72 65 64 69 72 65 63 | 74 69 6e 67 20 74 6f 20 | redirec|ting to |
|000037f0| 70 6f 73 74 6d 61 73 74 | 65 72 22 29 0d 15 86 11 |postmast|er")....|
|00003800| 3d 22 70 6f 73 74 6d 61 | 73 74 65 72 22 0d 15 90 |="postma|ster"...|
|00003810| 04 0d 15 9a 12 dd f2 72 | 63 6f 6d 6d 61 6e 64 28 |.......r|command(|
|00003820| 41 24 29 0d 15 a4 07 ea | 6c 25 0d 15 ae 15 e7 41 |A$).....|l%.....A|
|00003830| 24 3e 22 22 80 72 63 6f | 6d 6d 61 6e 64 25 8c 0d |$>"".rco|mmand%..|
|00003840| 15 b8 38 20 20 6c 25 3d | 30 3a c8 95 a7 66 72 6f |..8 l%=|0:...fro|
|00003850| 6d 24 2c 72 63 68 6f 73 | 74 24 28 6c 25 29 29 3c |m$,rchos|t$(l%))<|
|00003860| 31 80 6c 25 3c 6d 61 78 | 72 63 68 6f 73 74 25 3a |1.l%<max|rchost%:|
|00003870| 6c 25 2b 3d 31 3a ce 0d | 15 c2 1d 20 20 e7 a7 66 |l%+=1:..|... ..f|
|00003880| 72 6f 6d 24 2c 72 63 68 | 6f 73 74 24 28 6c 25 29 |rom$,rch|ost$(l%)|
|00003890| 29 3e 30 8c 0d 15 cc 32 | 20 20 20 20 f2 6c 6f 67 |)>0....2| .log|
|000038a0| 28 22 52 65 6d 6f 74 65 | 20 63 6f 6d 6d 61 6e 64 |("Remote| command|
|000038b0| 20 66 72 6f 6d 20 22 2b | 66 72 6f 6d 24 2b 22 3a | from "+|from$+":|
|000038c0| 20 22 2b 41 24 29 0d 15 | d6 1e 20 20 20 20 f2 70 | "+A$)..|.. .p|
|000038d0| 61 72 73 65 6c 69 6e 65 | 28 a4 63 6c 65 61 6e 28 |arseline|(.clean(|
|000038e0| 41 24 29 29 0d 15 e0 07 | 20 20 cd 0d 15 ea 05 cd |A$))....| ......|
|000038f0| 0d 15 f4 05 e1 0d 15 fe | 04 0d 16 08 14 dd a4 64 |........|.......d|
|00003900| 65 63 6f 64 65 64 61 74 | 65 28 41 24 29 0d 16 12 |ecodedat|e(A$)...|
|00003910| 3b ea 72 65 73 25 2c 64 | 24 2c 6d 24 2c 79 24 2c |;.res%,d|$,m$,y$,|
|00003920| 6c 25 2c 6d 25 3a f4 20 | 61 74 74 65 6d 70 74 20 |l%,m%:. |attempt |
|00003930| 74 6f 20 64 65 63 6f 64 | 65 20 68 65 61 64 65 72 |to decod|e header|
|00003940| 20 64 61 74 65 2e 2e 2e | 0d 16 1c 22 6c 25 3d a7 | date...|..."l%=.|
|00003950| 41 24 2c 22 2c 22 29 3a | e7 6c 25 3e 30 8c 41 24 |A$,","):|.l%>0.A$|
|00003960| 3d c1 41 24 2c 6c 25 2b | 31 29 0d 16 26 2d 20 20 |=.A$,l%+|1)..&- |
|00003970| 41 24 3d a4 63 6c 65 61 | 6e 28 41 24 29 3a 41 24 |A$=.clea|n(A$):A$|
|00003980| 3d a4 6c 6f 77 65 72 28 | 41 24 29 3a 6c 25 3d a7 |=.lower(|A$):l%=.|
|00003990| 41 24 2c 22 20 22 29 0d | 16 30 22 20 20 64 24 3d |A$," ").|.0" d$=|
|000039a0| c0 41 24 2c 6c 25 2d 31 | 29 3a e7 6c 25 3d 32 8c |.A$,l%-1|):.l%=2.|
|000039b0| 64 24 3d 22 30 22 2b 64 | 24 0d 16 3a 41 20 20 6d |d$="0"+d|$..:A m|
|000039c0| 25 3d a7 22 6a 61 6e 66 | 65 62 6d 61 72 61 70 72 |%=."janf|ebmarapr|
|000039d0| 6d 61 79 6a 75 6e 6a 75 | 6c 61 75 67 73 65 70 6f |mayjunju|laugsepo|
|000039e0| 63 74 6e 6f 76 64 65 63 | 22 2c c1 41 24 2c 6c 25 |ctnovdec|",.A$,l%|
|000039f0| 2b 31 2c 33 29 29 81 33 | 2b 31 0d 16 44 14 20 20 |+1,3)).3|+1..D. |
|00003a00| 6d 24 3d c2 22 30 22 2b | c3 6d 25 2c 32 29 0d 16 |m$=."0"+|.m%,2)..|
|00003a10| 4e 20 20 20 79 24 3d c1 | 41 24 2c 6c 25 2b 35 2c |N y$=.|A$,l%+5,|
|00003a20| 34 29 3a 6c 25 3d a7 79 | 24 2c 22 20 22 29 0d 16 |4):l%=.y|$," ")..|
|00003a30| 58 24 20 20 e7 6c 25 3e | 30 8c 79 24 3d c3 28 28 |X$ .l%>|0.y$=.((|
|00003a40| a4 74 69 6d 65 29 81 31 | 45 36 29 2b c0 79 24 2c |.time).1|E6)+.y$,|
|00003a50| 32 29 0d 16 62 25 20 20 | e7 bb 64 24 2a bb 6d 24 |2)..b% |..d$*.m$|
|00003a60| 2a bb 79 24 3e 30 8c 72 | 65 73 25 3d bb 28 79 24 |*.y$>0.r|es%=.(y$|
|00003a70| 2b 6d 24 2b 64 24 29 0d | 16 6c 09 3d 72 65 73 25 |+m$+d$).|.l.=res%|
|00003a80| 0d 16 76 04 0d 16 80 16 | dd f2 64 65 6c 65 74 65 |..v.....|..delete|
|00003a90| 69 64 28 67 25 2c 69 64 | 24 29 0d 16 8a 0f ea 61 |id(g%,id|$).....a|
|00003aa0| 25 2c 66 24 2c 69 64 31 | 24 0d 16 94 14 f5 69 64 |%,f$,id1|$.....id|
|00003ab0| 31 24 3d a4 73 70 61 72 | 28 69 64 24 29 0d 16 9e |1$=.spar|(id$)...|
|00003ac0| 43 20 20 f2 70 72 69 6e | 74 28 22 22 2c a4 6d 73 |C .prin|t("",.ms|
|00003ad0| 67 31 28 22 41 63 61 6e | 63 65 6c 22 2c 69 64 31 |g1("Acan|cel",id1|
|00003ae0| 24 29 2c 22 22 2c 22 22 | 29 3a 61 25 3d a4 66 69 |$),"",""|):a%=.fi|
|00003af0| 6e 64 61 72 74 69 64 28 | 67 25 2c 69 64 31 24 29 |ndartid(|g%,id1$)|
|00003b00| 0d 16 a8 0c 20 20 e7 61 | 25 3e 30 8c 0d 16 b2 3e |.... .a|%>0....>|
|00003b10| 20 20 20 20 f2 64 65 6c | 61 72 74 28 67 25 2c 61 | .del|art(g%,a|
|00003b20| 25 29 3a f2 6c 6f 67 28 | 22 43 61 6e 63 65 6c 6c |%):.log(|"Cancell|
|00003b30| 65 64 20 22 2b 69 64 31 | 24 2b 22 20 69 6e 20 22 |ed "+id1|$+" in "|
|00003b40| 2b 67 72 70 24 28 67 25 | 29 29 0d 16 bc 09 20 20 |+grp$(g%|)).... |
|00003b50| 20 20 cc 0d 16 c6 28 20 | 20 20 20 f2 70 72 69 6e | ....( | .prin|
|00003b60| 74 28 22 22 2c a4 6d 73 | 67 30 28 22 41 66 61 69 |t("",.ms|g0("Afai|
|00003b70| 6c 31 22 29 2c 22 22 2c | 22 22 29 0d 16 d0 07 20 |l1"),"",|"").... |
|00003b80| 20 cd 0d 16 da 0b fd 69 | 64 24 3d 22 22 0d 16 e4 | ......i|d$=""...|
|00003b90| 05 e1 0d 16 ee 04 0d 16 | f8 16 dd f2 64 6f 63 6f |........|....doco|
|00003ba0| 6e 74 72 6f 6c 28 67 25 | 2c 61 24 29 0d 17 02 07 |ntrol(g%|,a$)....|
|00003bb0| ea 63 24 0d 17 0c 18 63 | 24 3d a4 63 6c 65 61 6e |.c$....c|$=.clean|
|00003bc0| 28 a4 73 70 61 72 28 61 | 24 29 29 0d 17 16 1c e7 |(.spar(a|$)).....|
|00003bd0| 63 24 3d 22 63 61 6e 63 | 65 6c 22 80 64 6f 63 61 |c$="canc|el".doca|
|00003be0| 6e 63 25 3c 3e 30 8c 0d | 17 20 39 20 20 61 24 3d |nc%<>0..|. 9 a$=|
|00003bf0| a4 63 6c 65 61 6e 28 61 | 24 29 3a e7 c0 61 24 2c |.clean(a|$):..a$,|
|00003c00| 31 29 3d 22 3c 22 80 c2 | 61 24 29 3d 22 3e 22 8c |1)="<"..|a$)=">".|
|00003c10| f2 64 65 6c 65 74 65 69 | 64 28 67 25 2c 61 24 29 |.deletei|d(g%,a$)|
|00003c20| 0d 17 2a 05 cd 0d 17 34 | 05 e1 0d 17 3e 04 0d 17 |..*....4|....>...|
|00003c30| 48 0c dd f2 64 6f 78 72 | 65 66 0d 17 52 0d ea 78 |H...doxr|ef..R..x|
|00003c40| 72 65 66 24 2c 63 25 0d | 17 5c 1c 78 72 65 66 24 |ref$,c%.|.\.xref$|
|00003c50| 3d 22 58 72 65 66 3a 20 | 22 2b a4 66 75 6c 6c 6e |="Xref: |"+.fulln|
|00003c60| 61 6d 65 0d 17 66 28 c8 | 95 6f 75 74 67 25 28 63 |ame..f(.|.outg%(c|
|00003c70| 25 29 3e 30 80 63 25 3c | 6d 61 78 73 61 76 65 25 |%)>0.c%<|maxsave%|
|00003c80| 80 a9 78 72 65 66 24 3c | 32 30 30 0d 17 70 3a 20 |..xref$<|200..p: |
|00003c90| 20 78 72 65 66 24 3d 78 | 72 65 66 24 2b 22 20 22 | xref$=x|ref$+" "|
|00003ca0| 2b 67 72 70 24 28 6f 75 | 74 67 25 28 63 25 29 29 |+grp$(ou|tg%(c%))|
|00003cb0| 2b 22 3a 22 2b c3 6f 75 | 74 73 25 28 63 25 29 3a |+":"+.ou|ts%(c%):|
|00003cc0| 63 25 2b 3d 31 0d 17 7a | 05 ce 0d 17 84 17 f2 61 |c%+=1..z|.......a|
|00003cd0| 64 64 74 6f 62 75 66 66 | 65 72 28 78 72 65 66 24 |ddtobuff|er(xref$|
|00003ce0| 29 0d 17 8e 05 e1 0d 17 | 98 04 0d 17 a2 15 dd f2 |).......|........|
|00003cf0| 61 64 64 75 73 74 6f 70 | 61 74 68 28 61 24 29 0d |addustop|ath(a$).|
|00003d00| 17 ac 1f ea 62 24 3a 64 | 69 73 63 61 72 64 25 3d |....b$:d|iscard%=|
|00003d10| b9 3a 62 24 3d a4 66 75 | 6c 6c 6e 61 6d 65 0d 17 |.:b$=.fu|llname..|
|00003d20| b6 15 e7 62 24 3e 22 22 | 80 a7 61 24 2c 62 24 29 |...b$>""|..a$,b$)|
|00003d30| 3c 31 8c 0d 17 c0 2b 20 | 20 f2 61 64 64 68 65 61 |<1....+ | .addhea|
|00003d40| 64 65 72 74 6f 62 75 66 | 66 65 72 28 22 50 61 74 |dertobuf|fer("Pat|
|00003d50| 68 3a 20 22 2b 62 24 2b | 22 21 22 2c 31 29 0d 17 |h: "+b$+|"!",1)..|
|00003d60| ca 22 20 20 f2 61 64 64 | 74 6f 62 75 66 66 65 72 |." .add|tobuffer|
|00003d70| 28 a4 63 6c 65 61 6e 28 | c1 61 24 2c 36 29 29 29 |(.clean(|.a$,6)))|
|00003d80| 0d 17 d4 07 20 20 cc 0d | 17 de 16 20 20 f2 61 64 |.... ..|... .ad|
|00003d90| 64 74 6f 62 75 66 66 65 | 72 28 61 24 29 0d 17 e8 |dtobuffe|r(a$)...|
|00003da0| 05 cd 0d 17 f2 05 e1 0d | 17 fc 04 0d 18 06 0d dd |........|........|
|00003db0| a4 67 65 74 6c 69 6e 65 | 0d 18 10 2f f4 20 69 66 |.getline|.../. if|
|00003dc0| 20 6c 69 6e 65 20 69 6e | 63 6f 6d 70 6c 65 74 65 | line in|complete|
|00003dd0| 2c 20 6c 6f 6e 67 25 20 | 69 73 20 73 65 74 20 74 |, long% |is set t|
|00003de0| 6f 20 54 52 55 45 2e 0d | 18 1a 0d ea 43 25 2c 50 |o TRUE..|....C%,P|
|00003df0| 25 2c 41 24 0d 18 24 4b | f4 20 74 72 79 20 66 61 |%,A$..$K|. try fa|
|00003e00| 73 74 20 6c 69 6e 65 20 | 66 65 74 63 68 20 69 66 |st line |fetch if|
|00003e10| 20 70 6f 73 73 69 62 6c | 65 20 28 69 65 2c 20 69 | possibl|e (ie, i|
|00003e20| 66 20 6e 6f 74 20 6e 65 | 61 72 20 65 6e 64 20 6f |f not ne|ar end o|
|00003e30| 66 20 69 6e 70 75 74 20 | 62 75 66 66 65 72 29 0d |f input |buffer).|
|00003e40| 18 2e 24 6c 6f 6e 67 25 | 3d a3 3a 64 69 73 63 61 |..$long%|=.:disca|
|00003e50| 72 64 25 3d 30 3a 6c 61 | 73 74 70 6f 73 25 3d 70 |rd%=0:la|stpos%=p|
|00003e60| 6f 73 25 0d 18 38 2b e7 | 62 75 66 70 74 72 25 2b |os%..8+.|bufptr%+|
|00003e70| 32 35 34 3e 3d 69 6e 62 | 75 66 73 69 7a 65 25 8c |254>=inb|ufsize%.|
|00003e80| 3a 3d a4 73 6c 6f 77 67 | 65 74 6c 69 6e 65 0d 18 |:=.slowg|etline..|
|00003e90| 42 2b 50 25 3d 62 75 66 | 70 74 72 25 2b 69 6e 62 |B+P%=buf|ptr%+inb|
|00003ea0| 75 66 25 3a d6 67 65 74 | 6c 69 6e 65 25 2c 6c 6f |uf%:.get|line%,lo|
|00003eb0| 6e 67 25 2c 50 25 2c 41 | 24 0d 18 4c 20 50 25 3d |ng%,P%,A|$..L P%=|
|00003ec0| a9 41 24 2d 28 6c 6f 6e | 67 25 3d 30 29 3a 62 75 |.A$-(lon|g%=0):bu|
|00003ed0| 66 70 74 72 25 2b 3d 50 | 25 0d 18 56 1f 70 6f 73 |fptr%+=P|%..V.pos|
|00003ee0| 25 2b 3d 50 25 3a e7 70 | 6f 73 25 3e 3d 6c 65 6e |%+=P%:.p|os%>=len|
|00003ef0| 25 8c 65 6f 66 25 3d b9 | 0d 18 60 07 3d 41 24 0d |%.eof%=.|..`.=A$.|
|00003f00| 18 6a 04 0d 18 74 11 dd | a4 73 6c 6f 77 67 65 74 |.j...t..|.slowget|
|00003f10| 6c 69 6e 65 0d 18 7e 0d | ea 43 25 2c 50 25 2c 41 |line..~.|.C%,P%,A|
|00003f20| 24 0d 18 88 0a 50 25 3d | 30 3a f5 0d 18 92 28 20 |$....P%=|0:....( |
|00003f30| 20 43 25 3d 69 6e 62 75 | 66 25 3f 62 75 66 70 74 | C%=inbu|f%?bufpt|
|00003f40| 72 25 3a 62 75 66 70 74 | 72 25 2b 3d 31 3a 50 25 |r%:bufpt|r%+=1:P%|
|00003f50| 2b 3d 31 0d 18 9c 27 20 | 20 e7 50 25 3c 32 35 30 |+=1...' | .P%<250|
|00003f60| 8c 74 6d 70 25 3f 50 25 | 3d 43 25 20 8b 43 25 3d |.tmp%?P%|=C% .C%=|
|00003f70| 31 33 3a 6c 6f 6e 67 25 | 3d b9 0d 18 a6 1f 20 20 |13:long%|=..... |
|00003f80| e7 62 75 66 70 74 72 25 | 3d 69 6e 62 75 66 73 69 |.bufptr%|=inbufsi|
|00003f90| 7a 65 25 8c f2 66 69 6c | 6c 0d 18 b0 10 fd 43 25 |ze%..fil|l.....C%|
|00003fa0| 3d 31 30 84 43 25 3d 31 | 33 0d 18 ba 15 e7 43 25 |=10.C%=1|3.....C%|
|00003fb0| 3d 31 84 43 25 3e 33 31 | 8c 50 25 2b 3d 31 0d 18 |=1.C%>31|.P%+=1..|
|00003fc0| c4 2a 74 6d 70 25 3f 50 | 25 3d 31 33 3a 70 6f 73 |.*tmp%?P|%=13:pos|
|00003fd0| 25 2b 3d 50 25 3a e7 70 | 6f 73 25 3e 3d 6c 65 6e |%+=P%:.p|os%>=len|
|00003fe0| 25 8c 65 6f 66 25 3d b9 | 0d 18 ce 0e 3d 24 28 74 |%.eof%=.|....=$(t|
|00003ff0| 6d 70 25 2b 31 29 0d 18 | d8 04 0d 18 e2 04 0d 18 |mp%+1)..|........|
|00004000| ec 0f dd f2 75 70 64 61 | 74 65 70 6f 73 0d 18 f6 |....upda|tepos...|
|00004010| 0d ea 73 74 61 74 24 2c | 74 25 0d 19 00 0d e7 6c |..stat$,|t%.....l|
|00004020| 65 6e 25 3e 30 20 8c 0d | 19 0a 42 20 20 73 74 61 |en%>0 ..|..B sta|
|00004030| 74 24 3d c3 70 6f 73 25 | 2b 22 2f 22 2b c3 6c 65 |t$=.pos%|+"/"+.le|
|00004040| 6e 25 2b 22 20 62 79 74 | 65 73 20 28 22 2b c3 28 |n%+" byt|es ("+.(|
|00004050| a8 28 31 30 30 2a 28 70 | 6f 73 25 2f 6c 65 6e 25 |.(100*(p|os%/len%|
|00004060| 29 29 29 2b 22 25 29 20 | 22 0d 19 14 45 20 20 74 |)))+"%) |"...E t|
|00004070| 25 3d 94 28 64 73 74 69 | 6d 65 25 2d 74 69 6d 65 |%=.(dsti|me%-time|
|00004080| 25 29 81 31 30 30 3a e7 | 74 25 3e 30 8c 73 74 61 |%).100:.|t%>0.sta|
|00004090| 74 24 2b 3d c3 28 28 70 | 6f 73 25 2d 62 73 74 61 |t$+=.((p|os%-bsta|
|000040a0| 72 74 25 29 81 74 25 29 | 2b 22 63 70 73 22 0d 19 |rt%).t%)|+"cps"..|
|000040b0| 1e 42 20 20 f2 70 72 69 | 6e 74 28 a4 6d 73 67 31 |.B .pri|nt(.msg1|
|000040c0| 28 22 44 74 79 70 65 22 | 2c 74 79 24 29 2c 22 22 |("Dtype"|,ty$),""|
|000040d0| 2c 73 74 61 74 24 2c a4 | 6d 73 67 31 28 22 4e 65 |,stat$,.|msg1("Ne|
|000040e0| 77 6e 65 77 73 22 2c c3 | 74 6f 74 61 6c 25 29 29 |wnews",.|total%))|
|000040f0| 0d 19 28 3d 20 20 e7 62 | 61 72 69 63 24 3d 64 65 |..(= .b|aric$=de|
|00004100| 66 69 63 24 8c f2 63 68 | 61 6e 67 65 69 63 28 22 |fic$..ch|angeic("|
|00004110| 6e 65 77 73 62 61 73 65 | 64 22 29 8b f2 63 68 61 |newsbase|d")..cha|
|00004120| 6e 67 65 69 63 28 64 65 | 66 69 63 24 29 0d 19 32 |ngeic(de|fic$)..2|
|00004130| 05 cd 0d 19 3c 05 e1 0d | 19 46 04 0d 19 50 15 dd |....<...|.F...P..|
|00004140| f2 61 64 64 74 6f 62 75 | 66 66 65 72 28 41 24 29 |.addtobu|ffer(A$)|
|00004150| 0d 19 5a 3f f4 20 74 68 | 69 73 20 61 75 74 6f 6d |..Z?. th|is autom|
|00004160| 61 74 69 63 61 6c 6c 79 | 20 61 64 64 73 20 63 6f |atically| adds co|
|00004170| 6e 74 69 6e 75 61 74 69 | 6f 6e 20 6c 69 6e 65 73 |ntinuati|on lines|
|00004180| 20 74 6f 20 74 68 65 20 | 62 75 66 66 65 72 2e 0d | to the |buffer..|
|00004190| 19 64 3b e7 70 74 72 25 | 3e 63 62 75 66 73 69 7a |.d;.ptr%|>cbufsiz|
|000041a0| 65 25 20 f2 65 78 74 65 | 6e 64 28 69 6e 62 75 66 |e% .exte|nd(inbuf|
|000041b0| 73 69 7a 65 25 2b 62 75 | 66 73 69 7a 65 25 2b 64 |size%+bu|fsize%+d|
|000041c0| 65 66 61 72 74 62 75 66 | 25 29 0d 19 6e 31 24 28 |efartbuf|%)..n1$(|
|000041d0| 61 72 74 62 61 73 65 25 | 2b 70 74 72 25 29 3d 41 |artbase%|+ptr%)=A|
|000041e0| 24 3a 70 74 72 25 2b 3d | a9 41 24 3a e7 6c 6f 6e |$:ptr%+=|.A$:.lon|
|000041f0| 67 25 8c f2 61 64 64 6c | 6f 6e 67 0d 19 78 1c 61 |g%..addl|ong..x.a|
|00004200| 72 74 62 61 73 65 25 3f | 70 74 72 25 3d 31 30 3a |rtbase%?|ptr%=10:|
|00004210| 70 74 72 25 2b 3d 31 0d | 19 82 05 e1 0d 19 8c 04 |ptr%+=1.|........|
|00004220| 0d 19 96 0d dd f2 61 64 | 64 6c 6f 6e 67 0d 19 a0 |......ad|dlong...|
|00004230| 0b c8 95 6c 6f 6e 67 25 | 0d 19 aa 11 20 20 41 24 |...long%|.... A$|
|00004240| 3d a4 67 65 74 6c 69 6e | 65 0d 19 b4 3d 20 20 e7 |=.getlin|e...= .|
|00004250| 70 74 72 25 3e 63 62 75 | 66 73 69 7a 65 25 8c f2 |ptr%>cbu|fsize%..|
|00004260| 65 78 74 65 6e 64 28 69 | 6e 62 75 66 73 69 7a 65 |extend(i|nbufsize|
|00004270| 25 2b 62 75 66 73 69 7a | 65 25 2b 64 65 66 61 72 |%+bufsiz|e%+defar|
|00004280| 74 62 75 66 25 29 0d 19 | be 23 20 20 24 28 61 72 |tbuf%)..|.# $(ar|
|00004290| 74 62 61 73 65 25 2b 70 | 74 72 25 29 3d 41 24 3a |tbase%+p|tr%)=A$:|
|000042a0| 70 74 72 25 2b 3d a9 41 | 24 0d 19 c8 05 ce 0d 19 |ptr%+=.A|$.......|
|000042b0| d2 05 e1 0d 19 dc 04 0d | 19 e6 1f dd f2 61 64 64 |........|.....add|
|000042c0| 68 65 61 64 65 72 74 6f | 62 75 66 66 65 72 28 41 |headerto|buffer(A|
|000042d0| 24 2c 68 6c 25 29 0d 19 | f0 25 f4 20 68 6c 25 20 |$,hl%)..|.%. hl% |
|000042e0| 3d 20 6c 69 6e 65 20 69 | 73 20 6c 6f 6e 67 20 28 |= line i|s long (|
|000042f0| 69 6e 63 6f 6d 70 6c 65 | 74 65 29 0d 19 fa 3b e7 |incomple|te)...;.|
|00004300| 70 74 72 25 3e 63 62 75 | 66 73 69 7a 65 25 8c f2 |ptr%>cbu|fsize%..|
|00004310| 65 78 74 65 6e 64 28 69 | 6e 62 75 66 73 69 7a 65 |extend(i|nbufsize|
|00004320| 25 2b 62 75 66 73 69 7a | 65 25 2b 64 65 66 61 72 |%+bufsiz|e%+defar|
|00004330| 74 62 75 66 25 29 0d 1a | 04 41 24 28 61 72 74 62 |tbuf%)..|.A$(artb|
|00004340| 61 73 65 25 2b 70 74 72 | 25 29 3d 41 24 3a 70 74 |ase%+ptr|%)=A$:pt|
|00004350| 72 25 2b 3d a9 41 24 3a | e7 68 6c 25 3d 30 8c 61 |r%+=.A$:|.hl%=0.a|
|00004360| 72 74 62 61 73 65 25 3f | 70 74 72 25 3d 31 30 3a |rtbase%?|ptr%=10:|
|00004370| 70 74 72 25 2b 3d 31 0d | 1a 0e 05 e1 0d 1a 18 04 |ptr%+=1.|........|
|00004380| 0d 1a 22 12 dd f2 65 78 | 74 65 6e 64 28 6d 65 6d |.."...ex|tend(mem|
|00004390| 25 29 0d 1a 2c 05 f5 0d | 1a 36 2d 20 20 c8 99 22 |%)..,...|.6- .."|
|000043a0| 57 69 6d 70 5f 53 6c 6f | 74 53 69 7a 65 22 2c 6d |Wimp_Slo|tSize",m|
|000043b0| 69 6e 5f 6d 65 6d 25 2b | 6d 65 6d 25 2c 2d 31 b8 |in_mem%+|mem%,-1.|
|000043c0| 6e 65 77 25 0d 1a 40 34 | 20 20 e7 28 6d 69 6e 5f |new%..@4| .(min_|
|000043d0| 6d 65 6d 25 2b 6d 65 6d | 25 29 3e 6e 65 77 25 8c |mem%+mem|%)>new%.|
|000043e0| f2 6d 65 73 73 61 67 65 | 30 28 22 4e 65 65 64 6d |.message|0("Needm|
|000043f0| 65 6d 31 22 2c 31 30 29 | 0d 1a 4a 1a fd 28 6d 69 |em1",10)|..J..(mi|
|00004400| 6e 5f 6d 65 6d 25 2b 6d | 65 6d 25 29 3c 3d 6e 65 |n_mem%+m|em%)<=ne|
|00004410| 77 25 0d 1a 54 3c 62 75 | 66 73 69 7a 65 25 3d 6e |w%..T<bu|fsize%=n|
|00004420| 65 77 25 2d 6d 69 6e 5f | 6d 65 6d 25 2d 69 6e 62 |ew%-min_|mem%-inb|
|00004430| 75 66 73 69 7a 65 25 3a | 63 62 75 66 73 69 7a 65 |ufsize%:|cbufsize|
|00004440| 25 3d 62 75 66 73 69 7a | 65 25 2d 33 30 30 0d 1a |%=bufsiz|e%-300..|
|00004450| 5e 05 e1 0d 1a 68 04 0d | 1a 72 0f dd f2 63 68 65 |^....h..|.r...che|
|00004460| 63 6b 64 69 73 6b 0d 1a | 7c 0a ea 66 25 2c 46 25 |ckdisk..||..f%,F%|
|00004470| 0d 1a 86 05 f5 0d 1a 90 | 1b 66 25 3d a4 64 69 73 |........|.f%=.dis|
|00004480| 6b 73 70 61 63 65 28 62 | 61 73 65 64 69 72 24 29 |kspace(b|asedir$)|
|00004490| 0d 1a 9a 2f e7 66 25 3c | 28 6d 69 6e 64 73 6b 25 |.../.f%<|(mindsk%|
|000044a0| 2a 31 30 32 34 29 8c f2 | 6d 65 73 73 61 67 65 30 |*1024)..|message0|
|000044b0| 28 22 4e 65 65 64 64 69 | 73 6b 22 2c 31 30 29 0d |("Needdi|sk",10).|
|000044c0| 1a a4 17 fd 66 25 3e 3d | 28 6d 69 6e 64 73 6b 25 |....f%>=|(mindsk%|
|000044d0| 2a 31 30 32 34 29 0d 1a | ae 05 e1 0d 1a b8 04 0d |*1024)..|........|
|000044e0| 1a c2 13 dd a4 64 69 73 | 6b 73 70 61 63 65 28 61 |.....dis|kspace(a|
|000044f0| 24 29 0d 1a cc 0a ea 46 | 25 2c 66 25 0d 1a d6 1c |$).....F|%,f%....|
|00004500| e7 c0 61 24 2c 34 29 3d | 22 43 46 53 23 22 8c 61 |..a$,4)=|"CFS#".a|
|00004510| 24 3d c1 61 24 2c 35 29 | 0d 1a e0 31 c8 99 22 58 |$=.a$,5)|...1.."X|
|00004520| 4f 53 5f 46 53 43 6f 6e | 74 72 6f 6c 22 2c 34 39 |OS_FSCon|trol",49|
|00004530| 2c 61 24 b8 66 25 3b 46 | 25 3a e7 28 46 25 80 31 |,a$.f%;F|%:.(F%.1|
|00004540| 29 3c 3e 30 8c 66 25 3d | 30 0d 1a ea 07 3d 66 25 |)<>0.f%=|0....=f%|
|00004550| 0d 1a f4 04 0d 1a fe 0f | dd a4 63 6c 65 61 6e 28 |........|..clean(|
|00004560| 41 24 29 0d 1b 08 26 f4 | 20 73 74 72 69 70 73 20 |A$)...&.| strips |
|00004570| 6c 65 61 64 69 6e 67 20 | 26 20 74 72 61 69 6c 69 |leading |& traili|
|00004580| 6e 67 20 73 70 61 63 65 | 73 0d 1b 12 1e ea 42 24 |ng space|s.....B$|
|00004590| 3a e7 41 24 3e 22 22 8c | d6 74 72 69 6d 73 74 72 |:.A$>"".|.trimstr|
|000045a0| 25 2c 41 24 2c 42 24 0d | 1b 1c 07 3d 42 24 0d 1b |%,A$,B$.|...=B$..|
|000045b0| 26 04 0d 1b 30 1b dd f2 | 6f 70 65 6e 62 61 74 63 |&...0...|openbatc|
|000045c0| 68 28 66 24 2c 6f 66 66 | 73 65 74 25 29 0d 1b 3a |h(f$,off|set%)..:|
|000045d0| 14 66 30 30 25 3d a4 6f | 70 65 6e 69 6e 28 66 24 |.f00%=.o|penin(f$|
|000045e0| 29 0d 1b 44 28 62 75 66 | 70 74 72 25 3d 30 3a 65 |)..D(buf|ptr%=0:e|
|000045f0| 6f 66 25 3d a3 3a 6c 65 | 6e 25 3d 30 3a 70 6f 73 |of%=.:le|n%=0:pos|
|00004600| 25 3d 6f 66 66 73 65 74 | 25 0d 1b 4e 27 e7 66 30 |%=offset|%..N'.f0|
|00004610| 30 25 3c 3e 30 8c 6c 65 | 6e 25 3d a2 23 66 30 30 |0%<>0.le|n%=.#f00|
|00004620| 25 3a cf 23 66 30 30 25 | 3d 6f 66 66 73 65 74 25 |%:.#f00%|=offset%|
|00004630| 0d 1b 58 09 f2 66 69 6c | 6c 0d 1b 62 05 e1 0d 1b |..X..fil|l..b....|
|00004640| 6c 04 0d 1b 76 21 dd f2 | 72 65 73 74 61 72 74 62 |l...v!..|restartb|
|00004650| 61 74 63 68 28 66 24 2c | 74 25 2c 6f 66 66 73 65 |atch(f$,|t%,offse|
|00004660| 74 25 29 0d 1b 80 2f ea | 61 24 3a 61 24 3d a4 6d |t%).../.|a$:a$=.m|
|00004670| 73 67 30 28 22 4d 61 69 | 6c 22 29 3a e7 74 25 3e |sg0("Mai|l"):.t%>|
|00004680| 30 8c 61 24 3d a4 6d 73 | 67 30 28 22 4e 65 77 73 |0.a$=.ms|g0("News|
|00004690| 22 29 0d 1b 8a 1e f2 6d | 65 73 73 61 67 65 31 28 |").....m|essage1(|
|000046a0| 22 44 62 61 64 68 65 61 | 64 22 2c 61 24 2c 30 29 |"Dbadhea|d",a$,0)|
|000046b0| 0d 1b 94 34 f2 63 66 28 | 66 30 30 25 29 3a 6c 69 |...4.cf(|f00%):li|
|000046c0| 6e 65 24 3d 22 22 3a 64 | 65 6c 25 3d a3 3a f2 6f |ne$="":d|el%=.:.o|
|000046d0| 70 65 6e 62 61 74 63 68 | 28 66 24 2c 6f 66 66 73 |penbatch|(f$,offs|
|000046e0| 65 74 25 29 0d 1b 9e 05 | e1 0d 1b a8 04 0d 1b b2 |et%)....|........|
|000046f0| 0a dd f2 66 69 6c 6c 0d | 1b bc 0b ea 72 33 25 2c |...fill.|....r3%,|
|00004700| 46 25 0d 1b c6 0d e7 66 | 30 30 25 3c 3e 30 8c 0d |F%.....f|00%<>0..|
|00004710| 1b d0 35 20 20 c8 99 22 | 58 4f 53 5f 47 42 50 42 |..5 .."|XOS_GBPB|
|00004720| 22 2c 34 2c 66 30 30 25 | 2c 69 6e 62 75 66 25 2c |",4,f00%|,inbuf%,|
|00004730| 69 6e 62 75 66 73 69 7a | 65 25 b8 2c 2c 2c 72 33 |inbufsiz|e%.,,,r3|
|00004740| 25 3b 46 25 0d 1b da 20 | 20 20 e7 28 46 25 80 31 |%;F%... | .(F%.1|
|00004750| 29 3c 3e 30 84 72 33 25 | 3e 30 8c f2 63 66 28 66 |)<>0.r3%|>0..cf(f|
|00004760| 30 30 25 29 0d 1b e4 05 | cd 0d 1b ee 0d 62 75 66 |00%)....|.....buf|
|00004770| 70 74 72 25 3d 30 0d 1b | f8 05 e1 0d 1c 02 04 0d |ptr%=0..|........|
|00004780| 1c 0c 1a dd a4 61 64 64 | 74 6f 73 61 76 65 6c 69 |.....add|tosaveli|
|00004790| 73 74 28 67 24 2c 63 25 | 29 0d 1c 16 07 ea 67 25 |st(g$,c%|).....g%|
|000047a0| 0d 1c 20 1e 67 25 3d a4 | 6e 61 6d 65 74 6f 6e 6f |.. .g%=.|nametono|
|000047b0| 28 a4 63 6c 65 61 6e 28 | 67 24 29 2c b9 29 0d 1c |(.clean(|g$),.)..|
|000047c0| 2a 3c e7 67 25 3e 30 80 | 63 25 3c 3d 6d 61 78 73 |*<.g%>0.|c%<=maxs|
|000047d0| 61 76 65 25 8c 6f 75 74 | 67 25 28 63 25 29 3d 67 |ave%.out|g%(c%)=g|
|000047e0| 25 3a 6f 75 74 73 25 28 | 63 25 29 3d a4 73 65 71 |%:outs%(|c%)=.seq|
|000047f0| 28 67 25 29 3a 63 25 2b | 3d 31 0d 1c 34 07 3d 63 |(g%):c%+|=1..4.=c|
|00004800| 25 0d 1c 3e 04 0d 1c 48 | 15 dd f2 64 65 66 61 75 |%..>...H|...defau|
|00004810| 6c 74 73 61 76 65 6c 69 | 73 74 0d 1c 52 07 ea 67 |ltsaveli|st..R..g|
|00004820| 25 0d 1c 5c 0c c8 8e 74 | 79 70 65 25 ca 0d 1c 66 |%..\...t|ype%...f|
|00004830| 29 c9 30 3a 67 25 3d a4 | 6e 61 6d 65 74 6f 6e 6f |).0:g%=.|nametono|
|00004840| 28 22 45 6d 61 69 6c 2e | 70 6f 73 74 6d 61 73 74 |("Email.|postmast|
|00004850| 65 72 22 2c b9 29 0d 1c | 70 1c 7f 3a 67 25 3d a4 |er",.)..|p..:g%=.|
|00004860| 6e 61 6d 65 74 6f 6e 6f | 28 22 6a 75 6e 6b 22 2c |nametono|("junk",|
|00004870| b9 29 0d 1c 7a 05 cb 0d | 1c 84 31 e7 67 25 3e 30 |.)..z...|..1.g%>0|
|00004880| 8c 6f 75 74 67 25 28 29 | 3d 30 3a 6f 75 74 67 25 |.outg%()|=0:outg%|
|00004890| 28 30 29 3d 67 25 3a 6f | 75 74 73 25 28 30 29 3d |(0)=g%:o|uts%(0)=|
|000048a0| a4 73 65 71 28 67 25 29 | 0d 1c 8e 05 e1 0d 1c 98 |.seq(g%)|........|
|000048b0| 04 0d 1c a2 17 dd f2 67 | 72 6f 75 70 73 6c 69 6e |.......g|roupslin|
|000048c0| 65 28 6c 69 73 74 24 29 | 0d 1c ac 0e ea 6e 67 25 |e(list$)|.....ng%|
|000048d0| 3a 6e 67 25 3d 30 0d 1c | b6 32 e7 a7 6c 69 73 74 |:ng%=0..|.2..list|
|000048e0| 24 2c 22 2c 22 29 3d 30 | 8c 6e 67 25 3d a4 61 64 |$,",")=0|.ng%=.ad|
|000048f0| 64 74 6f 73 61 76 65 6c | 69 73 74 28 6c 69 73 74 |dtosavel|ist(list|
|00004900| 24 2c 6e 67 25 29 3a e1 | 0d 1c c0 23 e7 6c 6f 6e |$,ng%):.|...#.lon|
|00004910| 67 25 8c f2 6c 6f 6e 67 | 67 72 6f 75 70 73 6c 69 |g%..long|groupsli|
|00004920| 6e 65 28 6c 69 73 74 24 | 29 3a e1 0d 1c ca 05 f5 |ne(list$|):......|
|00004930| 0d 1c d4 30 20 20 6e 67 | 25 3d a4 61 64 64 74 6f |...0 ng|%=.addto|
|00004940| 73 61 76 65 6c 69 73 74 | 28 a4 67 65 74 70 61 72 |savelist|(.getpar|
|00004950| 28 6c 69 73 74 24 2c 22 | 2c 22 29 2c 6e 67 25 29 |(list$,"|,"),ng%)|
|00004960| 0d 1c de 0d fd 6c 69 73 | 74 24 3d 22 22 0d 1c e8 |.....lis|t$=""...|
|00004970| 05 e1 0d 1c f2 04 0d 1c | fc 1b dd f2 6c 6f 6e 67 |........|....long|
|00004980| 67 72 6f 75 70 73 6c 69 | 6e 65 28 6c 69 73 74 24 |groupsli|ne(list$|
|00004990| 29 0d 1d 06 2d ea 67 24 | 2c 70 25 2c 66 72 61 67 |)...-.g$|,p%,frag|
|000049a0| 24 2c 67 66 72 61 67 24 | 2c 6e 67 25 2c 65 6e 64 |$,gfrag$|,ng%,end|
|000049b0| 25 3a 6e 67 25 3d 30 3a | 65 6e 64 25 3d 30 0d 1d |%:ng%=0:|end%=0..|
|000049c0| 10 05 f5 0d 1d 1a 0e 20 | 20 66 72 61 67 24 3d 22 |....... | frag$="|
|000049d0| 22 0d 1d 24 0f 20 20 e7 | 6c 6f 6e 67 25 3d 30 8c |"..$. .|long%=0.|
|000049e0| 0d 1d 2e 0e 20 20 20 20 | 65 6e 64 25 3d b9 0d 1d |.... |end%=...|
|000049f0| 38 09 20 20 20 20 cc 0d | 1d 42 2f 20 20 20 20 70 |8. ..|.B/ p|
|00004a00| 25 3d a9 6c 69 73 74 24 | 3a f5 70 25 2d 3d 31 3a |%=.list$|:.p%-=1:|
|00004a10| fd 70 25 3d 31 84 c1 6c | 69 73 74 24 2c 70 25 2c |.p%=1..l|ist$,p%,|
|00004a20| 31 29 3d 22 2c 22 0d 1d | 4c 3f 20 20 20 20 e7 c1 |1)=","..|L? ..|
|00004a30| 6c 69 73 74 24 2c 70 25 | 2c 31 29 3d 22 2c 22 8c |list$,p%|,1)=",".|
|00004a40| 66 72 61 67 24 3d c1 6c | 69 73 74 24 2c 70 25 2b |frag$=.l|ist$,p%+|
|00004a50| 31 29 3a 6c 69 73 74 24 | 3d c0 6c 69 73 74 24 2c |1):list$|=.list$,|
|00004a60| 70 25 2d 31 29 0d 1d 56 | 07 20 20 cd 0d 1d 60 07 |p%-1)..V|. ...`.|
|00004a70| 20 20 f5 0d 1d 6a 3f 20 | 20 20 20 67 24 3d a4 67 | ...j? | g$=.g|
|00004a80| 65 74 70 61 72 28 6c 69 | 73 74 24 2c 22 2c 22 29 |etpar(li|st$,",")|
|00004a90| 3a e7 67 66 72 61 67 24 | 3e 22 22 8c 67 24 3d 67 |:.gfrag$|>"".g$=g|
|00004aa0| 66 72 61 67 24 2b 67 24 | 3a 67 66 72 61 67 24 3d |frag$+g$|:gfrag$=|
|00004ab0| 22 22 0d 1d 74 22 20 20 | 20 20 6e 67 25 3d a4 61 |""..t" | ng%=.a|
|00004ac0| 64 64 74 6f 73 61 76 65 | 6c 69 73 74 28 67 24 2c |ddtosave|list(g$,|
|00004ad0| 6e 67 25 29 0d 1d 7e 15 | 20 20 fd 67 24 3d 22 22 |ng%)..~.| .g$=""|
|00004ae0| 80 6c 69 73 74 24 3d 22 | 22 0d 1d 88 12 20 20 67 |.list$="|".... g|
|00004af0| 66 72 61 67 24 3d 66 72 | 61 67 24 0d 1d 92 37 20 |frag$=fr|ag$...7 |
|00004b00| 20 e7 6c 6f 6e 67 25 8c | 6c 69 73 74 24 3d a4 67 | .long%.|list$=.g|
|00004b10| 65 74 6c 69 6e 65 3a f2 | 61 64 64 68 65 61 64 65 |etline:.|addheade|
|00004b20| 72 74 6f 62 75 66 66 65 | 72 28 6c 69 73 74 24 2c |rtobuffe|r(list$,|
|00004b30| 31 29 0d 1d 9c 09 fd 65 | 6e 64 25 0d 1d a6 05 e1 |1).....e|nd%.....|
|00004b40| 0d 1d b0 04 0d 1d ba 0e | dd f2 73 61 76 65 6c 69 |........|..saveli|
|00004b50| 73 74 0d 1d c4 15 ea 63 | 25 2c 75 24 2c 6e 6f 73 |st.....c|%,u$,nos|
|00004b60| 61 76 65 25 2c 67 24 0d | 1d ce 0d 6e 6f 73 61 76 |ave%,g$.|...nosav|
|00004b70| 65 25 3d 30 0d 1d d8 1f | f4 20 63 68 65 63 6b 20 |e%=0....|. check |
|00004b80| 66 6f 72 20 76 61 6c 69 | 64 20 73 61 76 65 20 6c |for vali|d save l|
|00004b90| 69 73 74 0d 1d e2 20 e7 | 6f 75 74 67 25 28 30 29 |ist... .|outg%(0)|
|00004ba0| 3d 30 8c f2 64 65 66 61 | 75 6c 74 73 61 76 65 6c |=0..defa|ultsavel|
|00004bb0| 69 73 74 0d 1d ec 32 f4 | 20 63 68 65 63 6b 20 66 |ist...2.| check f|
|00004bc0| 69 6c 74 65 72 73 2c 20 | 26 20 63 68 65 63 6b 20 |ilters, |& check |
|00004bd0| 76 61 6c 69 64 20 73 61 | 76 65 20 6c 69 73 74 20 |valid sa|ve list |
|00004be0| 61 67 61 69 6e 0d 1d f6 | 3e e7 66 69 6c 74 25 28 |again...|>.filt%(|
|00004bf0| 74 79 70 65 25 29 3e 30 | 8c f2 63 68 65 63 6b 66 |type%)>0|..checkf|
|00004c00| 69 6c 74 65 72 73 3a e7 | 6f 75 74 67 25 28 30 29 |ilters:.|outg%(0)|
|00004c10| 3d 30 8c f2 64 65 66 61 | 75 6c 74 73 61 76 65 6c |=0..defa|ultsavel|
|00004c20| 69 73 74 0d 1e 00 10 e7 | 6f 75 74 67 25 28 30 29 |ist.....|outg%(0)|
|00004c30| 3e 30 8c 0d 1e 0a 0f 20 | 20 e7 74 79 70 65 25 3d |>0..... | .type%=|
|00004c40| 30 8c 0d 1e 14 26 20 20 | 20 20 67 24 3d 67 72 70 |0....& | g$=grp|
|00004c50| 24 28 6f 75 74 67 25 28 | 30 29 29 3a 75 24 3d a4 |$(outg%(|0)):u$=.|
|00004c60| 67 74 6f 75 28 67 24 29 | 0d 1e 1e 2f 20 20 20 20 |gtou(g$)|.../ |
|00004c70| f2 6c 6f 67 28 22 4e 65 | 77 20 6d 61 69 6c 20 66 |.log("Ne|w mail f|
|00004c80| 6f 72 20 22 2b 75 24 2b | 22 20 66 72 6f 6d 20 22 |or "+u$+|" from "|
|00004c90| 2b 66 72 6f 6d 24 29 0d | 1e 28 23 20 20 20 20 e7 |+from$).|.(# .|
|00004ca0| 72 65 63 65 69 70 74 24 | 3e 22 22 8c f2 72 65 74 |receipt$|>""..ret|
|00004cb0| 75 72 6e 72 65 63 65 69 | 70 74 0d 1e 32 24 20 20 |urnrecei|pt..2$ |
|00004cc0| 20 20 6e 6f 73 61 76 65 | 25 3d a4 63 68 65 63 6b | nosave|%=.check|
|00004cd0| 66 6f 72 77 61 72 64 28 | 67 24 2c 75 24 29 0d 1e |forward(|g$,u$)..|
|00004ce0| 3c 33 20 20 20 20 e7 6e | 6f 73 61 76 65 25 3d 30 |<3 .n|osave%=0|
|00004cf0| 80 a7 61 72 72 6d 61 69 | 6c 24 2c 75 24 29 3d 30 |..arrmai|l$,u$)=0|
|00004d00| 8c 61 72 72 6d 61 69 6c | 24 2b 3d 22 2c 22 2b 75 |.arrmail|$+=","+u|
|00004d10| 24 0d 1e 46 07 20 20 cd | 0d 1e 50 16 20 20 72 65 |$..F. .|..P. re|
|00004d20| 63 70 6f 73 25 3d 6c 61 | 73 74 70 6f 73 25 0d 1e |cpos%=la|stpos%..|
|00004d30| 5a 2e 20 20 63 25 3d 30 | 3a c8 95 6f 75 74 67 25 |Z. c%=0|:..outg%|
|00004d40| 28 63 25 29 3e 30 80 63 | 25 3c 6d 61 78 73 61 76 |(c%)>0.c|%<maxsav|
|00004d50| 65 25 80 6e 6f 73 61 76 | 65 25 3d 30 0d 1e 64 2b |e%.nosav|e%=0..d+|
|00004d60| 20 20 20 20 f2 61 72 74 | 73 61 76 65 28 6f 75 74 | .art|save(out|
|00004d70| 67 25 28 63 25 29 2c 6f | 75 74 73 25 28 63 25 29 |g%(c%),o|uts%(c%)|
|00004d80| 29 3a 63 25 2b 3d 31 0d | 1e 6e 07 20 20 ce 0d 1e |):c%+=1.|.n. ...|
|00004d90| 78 05 cd 0d 1e 82 05 e1 | 0d 1e 8c 04 0d 1e 96 12 |x.......|........|
|00004da0| dd f2 63 68 65 63 6b 66 | 69 6c 74 65 72 73 0d 1e |..checkf|ilters..|
|00004db0| a0 0f ea 6c 25 2c 74 25 | 3a 6c 25 3d 30 0d 1e aa |...l%,t%|:l%=0...|
|00004dc0| 1c c8 95 6c 25 3c 3d 6e | 66 69 6c 74 25 3a 74 25 |...l%<=n|filt%:t%|
|00004dd0| 3d 66 6c 74 25 28 6c 25 | 29 0d 1e b4 43 e7 74 25 |=flt%(l%|)...C.t%|
|00004de0| 3d 33 84 28 74 25 3d 32 | 80 74 79 70 65 25 3d 30 |=3.(t%=2|.type%=0|
|00004df0| 29 84 28 74 25 3d 31 80 | 74 79 70 65 25 3d 31 29 |).(t%=1.|type%=1)|
|00004e00| 8c e7 a4 64 6f 66 69 6c | 74 65 72 28 6c 25 29 3c |...dofil|ter(l%)<|
|00004e10| 3e 30 8c 6c 25 3d 6e 66 | 69 6c 74 25 0d 1e be 09 |>0.l%=nf|ilt%....|
|00004e20| 6c 25 2b 3d 31 0d 1e c8 | 05 ce 0d 1e d2 05 e1 0d |l%+=1...|........|
|00004e30| 1e dc 04 0d 1e e6 12 dd | a4 64 6f 66 69 6c 74 65 |........|.dofilte|
|00004e40| 72 28 6e 25 29 0d 1e f0 | 18 ea 6e 24 2c 61 24 2c |r(n%)...|..n$,a$,|
|00004e50| 6c 31 25 2c 6f 6b 25 2c | 6c 61 73 74 25 0d 1e fa |l1%,ok%,|last%...|
|00004e60| 09 6f 6b 25 3d 30 0d 1f | 04 1a e3 6c 31 25 3d 30 |.ok%=0..|...l1%=0|
|00004e70| b8 32 3a 66 6c 5f 6f 6b | 25 28 6c 31 25 29 3d a3 |.2:fl_ok|%(l1%)=.|
|00004e80| 0d 1f 0e 15 20 20 61 24 | 3d 66 6c 63 24 28 6e 25 |.... a$|=flc$(n%|
|00004e90| 2c 6c 31 25 29 0d 1f 18 | 15 20 20 c8 8e 66 6c 63 |,l1%)...|. ..flc|
|00004ea0| 25 28 6e 25 2c 6c 31 25 | 29 ca 0d 1f 22 2d 20 20 |%(n%,l1%|)..."- |
|00004eb0| 20 20 c9 31 3a e7 a4 73 | 6d 61 74 63 68 28 61 24 | .1:..s|match(a$|
|00004ec0| 2c 66 72 6f 6d 24 29 3e | 30 8c 66 6c 5f 6f 6b 25 |,from$)>|0.fl_ok%|
|00004ed0| 28 6c 31 25 29 3d b9 0d | 1f 2c 53 20 20 20 20 c9 |(l1%)=..|.,S .|
|00004ee0| 32 3a e7 a4 73 6d 61 74 | 63 68 28 61 24 2c 74 6f |2:..smat|ch(a$,to|
|00004ef0| 24 29 3e 30 84 a4 73 6d | 61 74 63 68 28 61 24 2c |$)>0..sm|atch(a$,|
|00004f00| 63 63 24 29 3e 30 84 a4 | 73 6d 61 74 63 68 28 61 |cc$)>0..|smatch(a|
|00004f10| 24 2c 6f 72 69 67 74 6f | 24 29 3e 30 8c 66 6c 5f |$,origto|$)>0.fl_|
|00004f20| 6f 6b 25 28 6c 31 25 29 | 3d b9 0d 1f 36 30 20 20 |ok%(l1%)|=...60 |
|00004f30| 20 20 c9 33 3a e7 a4 73 | 6d 61 74 63 68 28 61 24 | .3:..s|match(a$|
|00004f40| 2c 73 75 62 6a 65 63 74 | 24 29 3e 30 8c 66 6c 5f |,subject|$)>0.fl_|
|00004f50| 6f 6b 25 28 6c 31 25 29 | 3d b9 0d 1f 40 32 20 20 |ok%(l1%)|=...@2 |
|00004f60| 20 20 c9 34 3a e7 a4 73 | 6d 61 74 63 68 28 61 24 | .4:..s|match(a$|
|00004f70| 2c 6e 65 77 73 67 72 6f | 75 70 24 29 3e 30 8c 66 |,newsgro|up$)>0.f|
|00004f80| 6c 5f 6f 6b 25 28 6c 31 | 25 29 3d b9 0d 1f 4a 30 |l_ok%(l1|%)=...J0|
|00004f90| 20 20 20 20 c9 35 3a e7 | a4 73 6d 61 74 63 68 28 | .5:.|.smatch(|
|00004fa0| 61 24 2c 72 65 70 6c 79 | 74 6f 24 29 3e 30 8c 66 |a$,reply|to$)>0.f|
|00004fb0| 6c 5f 6f 6b 25 28 6c 31 | 25 29 3d b9 0d 1f 54 33 |l_ok%(l1|%)=...T3|
|00004fc0| 20 20 20 20 c9 36 3a e7 | a4 73 6d 61 74 63 68 28 | .6:.|.smatch(|
|00004fd0| 61 24 2c 70 72 65 63 65 | 64 65 6e 63 65 24 29 3e |a$,prece|dence$)>|
|00004fe0| 30 8c 66 6c 5f 6f 6b 25 | 28 6c 31 25 29 3d b9 0d |0.fl_ok%|(l1%)=..|
|00004ff0| 1f 5e 2b 20 20 20 20 c9 | 37 3a e7 a4 73 6d 61 74 |.^+ .|7:..smat|
|00005000| 63 68 28 61 24 2c 62 66 | 24 29 3e 30 8c 66 6c 5f |ch(a$,bf|$)>0.fl_|
|00005010| 6f 6b 25 28 6c 31 25 29 | 3d b9 0d 1f 68 32 20 20 |ok%(l1%)|=...h2 |
|00005020| 20 20 c9 38 3a e7 a4 73 | 6d 61 74 63 68 28 61 24 | .8:..s|match(a$|
|00005030| 2c 72 65 66 65 72 65 6e | 63 65 24 29 3e 30 8c 66 |,referen|ce$)>0.f|
|00005040| 6c 5f 6f 6b 25 28 6c 31 | 25 29 3d b9 0d 1f 72 07 |l_ok%(l1|%)=...r.|
|00005050| 20 20 cb 0d 1f 7c 31 20 | 20 e7 66 6c 6e 25 28 6e | ...|1 | .fln%(n|
|00005060| 25 2c 6c 31 25 29 3e 30 | 8c 66 6c 5f 6f 6b 25 28 |%,l1%)>0|.fl_ok%(|
|00005070| 6c 31 25 29 3d 28 66 6c | 5f 6f 6b 25 28 6c 31 25 |l1%)=(fl|_ok%(l1%|
|00005080| 29 3d a3 29 0d 1f 86 08 | ed 6c 31 25 0d 1f 90 11 |)=.)....|.l1%....|
|00005090| 6f 6b 25 3d 66 6c 5f 6f | 6b 25 28 30 29 0d 1f 9a |ok%=fl_o|k%(0)...|
|000050a0| 12 e7 66 6c 63 25 28 6e | 25 2c 31 29 3e 30 8c 0d |..flc%(n|%,1)>0..|
|000050b0| 1f a4 37 20 20 e7 66 6c | 6a 25 28 6e 25 2c 31 29 |..7 .fl|j%(n%,1)|
|000050c0| 3c 32 8c 6f 6b 25 3d 6f | 6b 25 2a 66 6c 5f 6f 6b |<2.ok%=o|k%*fl_ok|
|000050d0| 25 28 31 29 8b 6f 6b 25 | 3d 6f 6b 25 2b 66 6c 5f |%(1).ok%|=ok%+fl_|
|000050e0| 6f 6b 25 28 31 29 0d 1f | ae 14 20 20 e7 66 6c 63 |ok%(1)..|.. .flc|
|000050f0| 25 28 6e 25 2c 32 29 3e | 30 8c 0d 1f b8 39 20 20 |%(n%,2)>|0....9 |
|00005100| 20 20 e7 66 6c 6a 25 28 | 6e 25 2c 32 29 3c 32 8c | .flj%(|n%,2)<2.|
|00005110| 6f 6b 25 3d 6f 6b 25 2a | 66 6c 5f 6f 6b 25 28 32 |ok%=ok%*|fl_ok%(2|
|00005120| 29 8b 6f 6b 25 3d 6f 6b | 25 2b 66 6c 5f 6f 6b 25 |).ok%=ok|%+fl_ok%|
|00005130| 28 32 29 0d 1f c2 07 20 | 20 cd 0d 1f cc 05 cd 0d |(2).... | .......|
|00005140| 1f d6 09 e7 6f 6b 25 8c | 0d 1f e0 2e 20 20 f2 70 |....ok%.|.... .p|
|00005150| 72 69 6e 74 28 22 22 2c | a4 6d 73 67 31 28 22 46 |rint("",|.msg1("F|
|00005160| 61 70 70 6c 79 22 2c c3 | 28 6e 25 2b 31 29 29 2c |apply",.|(n%+1)),|
|00005170| 22 22 2c 22 22 29 0d 1f | ea 1a 20 20 61 24 3d a4 |"","")..|.. a$=.|
|00005180| 66 73 75 62 73 74 28 66 | 6c 61 24 28 6e 25 29 29 |fsubst(f|la$(n%))|
|00005190| 0d 1f f4 11 20 20 c8 8e | 66 6c 61 25 28 6e 25 29 |.... ..|fla%(n%)|
|000051a0| ca 0d 1f fe 23 20 20 20 | 20 c9 31 3a f2 6e 6f 73 |....# | .1:.nos|
|000051b0| 61 76 65 3a f2 64 65 66 | 61 75 6c 74 73 61 76 65 |ave:.def|aultsave|
|000051c0| 6c 69 73 74 0d 20 08 1e | 20 20 20 20 c9 32 3a f2 |list. ..| .2:.|
|000051d0| 6e 6f 73 61 76 65 3a 6f | 75 74 67 25 28 30 29 3d |nosave:o|utg%(0)=|
|000051e0| 2d 31 0d 20 12 2c 20 20 | 20 20 c9 33 3a e7 c0 61 |-1. ., | .3:..a|
|000051f0| 24 2c 31 29 3d 22 2b 22 | 8c 6e 24 3d a4 73 70 61 |$,1)="+"|.n$=.spa|
|00005200| 72 28 61 24 29 3a 8b f2 | 6e 6f 73 61 76 65 0d 20 |r(a$):..|nosave. |
|00005210| 1c 2b 20 20 20 20 20 20 | f2 6c 6f 67 28 22 46 69 |.+ |.log("Fi|
|00005220| 6c 74 65 72 20 72 65 64 | 69 72 65 63 74 69 6f 6e |lter red|irection|
|00005230| 20 74 6f 20 22 2b 61 24 | 29 0d 20 26 34 20 20 20 | to "+a$|). &4 |
|00005240| 20 20 20 6f 6b 25 3d 30 | 3a c8 95 6f 75 74 67 25 | ok%=0|:..outg%|
|00005250| 28 6f 6b 25 29 3e 30 80 | 6f 6b 25 3c 6d 61 78 73 |(ok%)>0.|ok%<maxs|
|00005260| 61 76 65 25 3a 6f 6b 25 | 2b 3d 31 3a ce 0d 20 30 |ave%:ok%|+=1:.. 0|
|00005270| 11 20 20 20 20 20 20 c8 | 95 61 24 3e 22 22 0d 20 |. .|.a$>"". |
|00005280| 3a 30 20 20 20 20 20 20 | 20 20 6c 61 73 74 25 3d |:0 | last%=|
|00005290| 6f 6b 25 3a 6e 24 3d a4 | 73 70 61 72 28 61 24 29 |ok%:n$=.|spar(a$)|
|000052a0| 3a 6e 24 3d a4 63 6c 65 | 61 6e 28 6e 24 29 0d 20 |:n$=.cle|an(n$). |
|000052b0| 44 13 20 20 20 20 20 20 | 20 20 e7 6e 24 3e 22 22 |D. | .n$>""|
|000052c0| 8c 0d 20 4e 30 20 20 20 | 20 20 20 20 20 20 20 6f |.. N0 | o|
|000052d0| 6b 25 3d a4 61 64 64 74 | 6f 73 61 76 65 6c 69 73 |k%=.addt|osavelis|
|000052e0| 74 28 a4 63 6c 65 61 6e | 28 6e 24 29 2c 6f 6b 25 |t(.clean|(n$),ok%|
|000052f0| 29 0d 20 58 3b 20 20 20 | 20 20 20 20 20 20 20 e7 |). X; | .|
|00005300| 6f 6b 25 3d 6c 61 73 74 | 25 8c f2 6c 6f 67 28 22 |ok%=last|%..log("|
|00005310| 49 6e 76 61 6c 69 64 20 | 72 65 64 69 72 65 63 74 |Invalid |redirect|
|00005320| 69 6f 6e 20 74 6f 20 22 | 2b 6e 24 29 0d 20 62 0d |ion to "|+n$). b.|
|00005330| 20 20 20 20 20 20 20 20 | cd 0d 20 6c 0b 20 20 20 | |.. l. |
|00005340| 20 20 20 ce 0d 20 76 16 | 20 20 20 20 c9 34 3a f2 | .. v.| .4:.|
|00005350| 73 75 62 6d 69 74 28 61 | 24 29 0d 20 80 07 20 20 |submit(a|$). .. |
|00005360| cb 0d 20 8a 05 cd 0d 20 | 94 08 3d 6f 6b 25 0d 20 |.. .... |..=ok%. |
|00005370| 9e 04 0d 20 a8 10 dd a4 | 66 73 75 62 73 74 28 61 |... ....|fsubst(a|
|00005380| 24 29 0d 20 b2 0a ea 62 | 24 2c 6c 25 0d 20 bc 0f |$). ...b|$,l%. ..|
|00005390| 6c 25 3d a7 61 24 2c 22 | 25 22 29 0d 20 c6 10 c8 |l%=.a$,"|%"). ...|
|000053a0| 95 6c 25 3e 30 3a 62 24 | 3d 22 22 0d 20 d0 12 c8 |.l%>0:b$|="". ...|
|000053b0| 8e c1 61 24 2c 6c 25 2b | 31 2c 31 29 ca 0d 20 da |..a$,l%+|1,1).. .|
|000053c0| 36 20 20 c9 22 75 22 3a | e7 74 79 70 65 25 3d 31 |6 ."u":|.type%=1|
|000053d0| 8c 62 24 3d 22 6e 65 77 | 73 22 8b 62 24 3d a4 67 |.b$="new|s".b$=.g|
|000053e0| 74 6f 75 28 67 72 70 24 | 28 6f 75 74 67 25 28 30 |tou(grp$|(outg%(0|
|000053f0| 29 29 29 0d 20 e4 13 20 | 20 c9 22 66 22 3a 62 24 |))). .. | ."f":b$|
|00005400| 3d 66 72 6f 6d 24 0d 20 | ee 11 20 20 c9 22 74 22 |=from$. |.. ."t"|
|00005410| 3a 62 24 3d 74 6f 24 0d | 20 f8 11 20 20 c9 22 63 |:b$=to$.| .. ."c|
|00005420| 22 3a 62 24 3d 63 63 24 | 0d 21 02 16 20 20 c9 22 |":b$=cc$|.!.. ."|
|00005430| 72 22 3a 62 24 3d 72 65 | 70 6c 79 74 6f 24 0d 21 |r":b$=re|plyto$.!|
|00005440| 0c 11 20 20 c9 22 25 22 | 3a 62 24 3d 22 25 22 0d |.. ."%"|:b$="%".|
|00005450| 21 16 05 cb 0d 21 20 27 | 61 24 3d c0 61 24 2c 6c |!....! '|a$=.a$,l|
|00005460| 25 2d 31 29 2b 62 24 2b | c1 61 24 2c 6c 25 2b 32 |%-1)+b$+|.a$,l%+2|
|00005470| 29 3a 6c 25 2b 3d a9 62 | 24 2d 31 0d 21 2a 12 6c |):l%+=.b|$-1.!*.l|
|00005480| 25 3d a7 61 24 2c 22 25 | 22 2c 6c 25 29 0d 21 34 |%=.a$,"%|",l%).!4|
|00005490| 05 ce 0d 21 3e 07 3d 61 | 24 0d 21 48 04 0d 21 52 |...!>.=a|$.!H..!R|
|000054a0| 0c dd f2 6e 6f 73 61 76 | 65 0d 21 5c 4d ea 6e 25 |...nosav|e.!\M.n%|
|000054b0| 2c 67 25 3a 6e 25 3d 30 | 3a f5 67 25 3d 6f 75 74 |,g%:n%=0|:.g%=out|
|000054c0| 67 25 28 6e 25 29 3a e7 | 67 25 3e 30 8c 6f 75 74 |g%(n%):.|g%>0.out|
|000054d0| 67 25 28 6e 25 29 3d 30 | 3a e7 67 72 70 73 65 71 |g%(n%)=0|:.grpseq|
|000054e0| 25 28 67 25 29 3e 30 8c | 67 72 70 73 65 71 25 28 |%(g%)>0.|grpseq%(|
|000054f0| 67 25 29 2d 3d 31 0d 21 | 66 1b 6e 25 2b 3d 31 3a |g%)-=1.!|f.n%+=1:|
|00005500| fd 67 25 3d 30 84 6e 25 | 3e 6d 61 78 73 61 76 65 |.g%=0.n%|>maxsave|
|00005510| 25 0d 21 70 05 e1 0d 21 | 7a 04 0d 21 84 10 dd f2 |%.!p...!|z..!....|
|00005520| 73 75 62 6d 69 74 28 61 | 24 29 0d 21 8e 1f ea 66 |submit(a|$).!...f|
|00005530| 24 2c 62 24 2c 46 25 2c | 6d 25 2c 64 25 3a 66 24 |$,b$,F%,|m%,d%:f$|
|00005540| 3d a4 74 6d 70 66 69 6c | 65 0d 21 98 37 c8 99 22 |=.tmpfil|e.!.7.."|
|00005550| 58 4f 53 5f 46 69 6c 65 | 22 2c 31 30 2c 66 24 2c |XOS_File|",10,f$,|
|00005560| 26 46 46 46 2c 2c 61 72 | 74 62 61 73 65 25 2c 61 |&FFF,,ar|tbase%,a|
|00005570| 72 74 62 61 73 65 25 2b | 70 74 72 25 b8 3b 46 25 |rtbase%+|ptr%.;F%|
|00005580| 0d 21 a2 0e e7 28 46 25 | 80 31 29 3d 30 8c 0d 21 |.!...(F%|.1)=0..!|
|00005590| ac 1a 20 20 c8 95 c0 a4 | 63 6c 65 61 6e 28 61 24 |.. ....|clean(a$|
|000055a0| 29 2c 31 29 3d 22 2d 22 | 0d 21 b6 12 20 20 62 24 |),1)="-"|.!.. b$|
|000055b0| 3d a4 73 70 61 72 28 61 | 24 29 0d 21 c0 0f 20 20 |=.spar(a|$).!.. |
|000055c0| c8 8e c0 62 24 2c 32 29 | ca 0d 21 ca 1d 20 20 20 |...b$,2)|..!.. |
|000055d0| 20 c9 22 2d 4d 22 3a 6d | 25 3d 31 30 32 34 2a bb | ."-M":m|%=1024*.|
|000055e0| c1 62 24 2c 33 29 0d 21 | d4 21 20 20 20 20 c9 22 |.b$,3).!|.! ."|
|000055f0| 2d 4b 22 3a f2 6e 6f 73 | 61 76 65 3a 6f 75 74 67 |-K":.nos|ave:outg|
|00005600| 25 28 30 29 3d 2d 31 0d | 21 de 12 20 20 20 20 c9 |%(0)=-1.|!.. .|
|00005610| 22 2d 44 22 3a 64 25 3d | b9 0d 21 e8 26 20 20 20 |"-D":d%=|..!.& |
|00005620| 20 c9 22 2d 4a 22 3a f2 | 6e 6f 73 61 76 65 3a f2 | ."-J":.|nosave:.|
|00005630| 64 65 66 61 75 6c 74 73 | 61 76 65 6c 69 73 74 0d |defaults|avelist.|
|00005640| 21 f2 07 20 20 cb 0d 21 | fc 07 20 20 ce 0d 22 06 |!.. ..!|.. ..".|
|00005650| 2a 20 20 e7 a4 66 72 65 | 65 6d 65 6d 28 30 29 3c |* ..fre|emem(0)<|
|00005660| 6d 25 8c f2 6d 65 73 73 | 61 67 65 30 28 22 46 6d |m%..mess|age0("Fm|
|00005670| 65 6d 31 22 2c 31 29 0d | 22 10 17 20 20 e7 a4 66 |em1",1).|".. ..f|
|00005680| 72 65 65 6d 65 6d 28 30 | 29 3e 3d 6d 25 8c 0d 22 |reemem(0|)>=m%.."|
|00005690| 1a 2e 20 20 f2 6c 6f 67 | 28 22 53 75 62 6d 69 74 |.. .log|("Submit|
|000056a0| 74 69 6e 67 20 66 69 6c | 74 65 72 20 6a 6f 62 3a |ting fil|ter job:|
|000056b0| 20 22 2b 61 24 29 3a f2 | 68 67 6f 6e 0d 22 24 47 | "+a$):.|hgon."$G|
|000056c0| 20 20 c8 99 22 58 57 69 | 6d 70 5f 53 74 61 72 74 | .."XWi|mp_Start|
|000056d0| 54 61 73 6b 22 2c 61 24 | 2b 22 20 22 2b 66 24 3a |Task",a$|+" "+f$:|
|000056e0| f2 68 67 6f 66 66 3a e7 | 64 25 8c f2 70 6f 6c 6c |.hgoff:.|d%..poll|
|000056f0| 28 30 29 3a 46 25 3d a4 | 64 65 6c 66 69 6c 65 28 |(0):F%=.|delfile(|
|00005700| 66 24 29 0d 22 2e 07 20 | 20 cc 0d 22 38 1a 20 20 |f$).".. | .."8. |
|00005710| f2 6d 65 73 73 61 67 65 | 30 28 22 46 6d 65 6d 32 |.message|0("Fmem2|
|00005720| 22 2c 30 29 0d 22 42 07 | 20 20 cd 0d 22 4c 05 cd |",0)."B.| .."L..|
|00005730| 0d 22 56 05 e1 0d 22 60 | 04 0d 22 6a 19 dd a4 63 |."V..."`|.."j...c|
|00005740| 68 65 63 6b 66 6f 72 77 | 61 72 64 28 67 24 2c 75 |heckforw|ard(g$,u|
|00005750| 24 29 0d 22 74 1a ea 75 | 25 2c 66 24 2c 73 24 2c |$)."t..u|%,f$,s$,|
|00005760| 46 25 2c 66 74 6f 24 2c | 72 65 74 25 0d 22 7e 19 |F%,fto$,|ret%."~.|
|00005770| 72 65 74 25 3d 30 3a 75 | 25 3d a4 75 73 65 72 6e |ret%=0:u|%=.usern|
|00005780| 6f 28 75 24 29 0d 22 88 | 0a e7 75 25 3e 30 8c 0d |o(u$).".|..u%>0..|
|00005790| 22 92 1f 20 20 66 24 3d | a4 75 70 61 74 68 28 75 |".. f$=|.upath(u|
|000057a0| 24 29 2b 22 2e 76 61 63 | 61 74 69 6f 6e 22 0d 22 |$)+".vac|ation"."|
|000057b0| 9c 26 20 20 e7 a4 6f 62 | 6a 74 79 70 65 28 66 24 |.& ..ob|jtype(f$|
|000057c0| 29 3d 31 80 a4 66 69 6c | 65 73 69 7a 65 28 66 24 |)=1..fil|esize(f$|
|000057d0| 29 3e 30 8c 0d 22 a6 40 | 20 20 20 20 e7 a7 70 72 |)>0..".@| ..pr|
|000057e0| 65 63 65 64 65 6e 63 65 | 24 2c 22 62 75 6c 6b 22 |ecedence|$,"bulk"|
|000057f0| 29 3d 30 80 a7 70 72 65 | 63 65 64 65 6e 63 65 24 |)=0..pre|cedence$|
|00005800| 2c 22 6a 75 6e 6b 22 29 | 3d 30 80 66 72 6f 6d 24 |,"junk")|=0.from$|
|00005810| 3e 22 22 8c 0d 22 b0 40 | 20 20 20 20 20 20 73 24 |>""..".@| s$|
|00005820| 3d 73 75 62 6a 65 63 74 | 24 3a e7 c0 a4 6c 6f 77 |=subject|$:...low|
|00005830| 65 72 28 73 75 62 6a 65 | 63 74 24 29 2c 34 29 3c |er(subje|ct$),4)<|
|00005840| 3e 22 72 65 3a 20 22 8c | 73 24 3d 22 52 65 3a 20 |>"re: ".|s$="Re: |
|00005850| 22 2b 73 24 0d 22 ba 1f | 20 20 20 20 20 20 f2 61 |"+s$."..| .a|
|00005860| 75 74 6f 6d 61 69 6c 28 | 75 24 2c 73 24 2c 66 24 |utomail(|u$,s$,f$|
|00005870| 2c 30 29 0d 22 c4 09 20 | 20 20 20 cd 0d 22 ce 07 |,0).".. | .."..|
|00005880| 20 20 cd 0d 22 d8 14 20 | 20 e7 75 66 77 64 24 28 | ..".. | .ufwd$(|
|00005890| 75 25 29 3e 22 22 8c 0d | 22 e2 35 20 20 20 20 66 |u%)>""..|".5 f|
|000058a0| 74 6f 24 3d 75 66 77 64 | 24 28 75 25 29 3a c8 95 |to$=ufwd|$(u%):..|
|000058b0| c0 66 74 6f 24 2c 31 29 | 3d 22 2b 22 3a 66 74 6f |.fto$,1)|="+":fto|
|000058c0| 24 3d c1 66 74 6f 24 2c | 32 29 3a ce 0d 22 ec 33 |$=.fto$,|2):..".3|
|000058d0| 20 20 20 20 f2 6c 6f 67 | 28 22 46 6f 72 77 61 72 | .log|("Forwar|
|000058e0| 64 69 6e 67 20 6d 61 69 | 6c 20 66 6f 72 20 22 2b |ding mai|l for "+|
|000058f0| 75 24 2b 22 20 74 6f 20 | 22 2b 66 74 6f 24 29 0d |u$+" to |"+fto$).|
|00005900| 22 f6 4c 20 20 20 20 66 | 24 3d a4 74 6d 70 66 69 |".L f|$=.tmpfi|
|00005910| 6c 65 3a c8 99 22 58 4f | 53 5f 46 69 6c 65 22 2c |le:.."XO|S_File",|
|00005920| 31 30 2c 66 24 2c 26 46 | 46 46 2c 2c 61 72 74 62 |10,f$,&F|FF,,artb|
|00005930| 61 73 65 25 2c 61 72 74 | 62 61 73 65 25 2b 70 74 |ase%,art|base%+pt|
|00005940| 72 25 20 b8 65 72 72 25 | 3b 46 25 0d 23 00 12 20 |r% .err%|;F%.#.. |
|00005950| 20 20 20 e7 28 46 25 80 | 31 29 3d 30 8c 0d 23 0a | .(F%.|1)=0..#.|
|00005960| 20 20 20 20 20 20 20 66 | 24 3d a4 72 65 6d 61 69 | f|$=.remai|
|00005970| 6c 28 66 74 6f 24 2c 66 | 24 2c 75 24 29 0d 23 14 |l(fto$,f|$,u$).#.|
|00005980| 2a 20 20 20 20 20 20 e7 | 66 24 3d 22 22 80 c0 75 |* .|f$=""..u|
|00005990| 66 77 64 24 28 75 25 29 | 2c 31 29 3c 3e 22 2b 22 |fwd$(u%)|,1)<>"+"|
|000059a0| 8c 72 65 74 25 3d 31 0d | 23 1e 09 20 20 20 20 cd |.ret%=1.|#.. .|
|000059b0| 0d 23 28 07 20 20 cd 0d | 23 32 05 cd 0d 23 3c 09 |.#(. ..|#2...#<.|
|000059c0| 3d 72 65 74 25 0d 23 46 | 04 0d 23 50 0e dd a4 67 |=ret%.#F|..#P...g|
|000059d0| 74 6f 75 28 67 24 29 0d | 23 5a 10 ea 75 24 2c 75 |tou(g$).|#Z..u$,u|
|000059e0| 25 3a 75 24 3d 67 24 0d | 23 64 1d e7 c0 a4 6c 6f |%:u$=g$.|#d....lo|
|000059f0| 77 65 72 28 67 24 29 2c | 36 29 3d 22 65 6d 61 69 |wer(g$),|6)="emai|
|00005a00| 6c 2e 22 8c 0d 23 6e 2e | 20 20 75 24 3d c1 67 24 |l."..#n.| u$=.g$|
|00005a10| 2c 37 29 3a 75 25 3d a7 | 75 24 2c 22 2e 22 29 3a |,7):u%=.|u$,"."):|
|00005a20| e7 75 25 3e 30 8c 75 24 | 3d c0 75 24 2c 75 25 2d |.u%>0.u$|=.u$,u%-|
|00005a30| 31 29 0d 23 78 05 cd 0d | 23 82 07 3d 75 24 0d 23 |1).#x...|#..=u$.#|
|00005a40| 8c 04 0d 23 96 21 dd f2 | 61 75 74 6f 6d 61 69 6c |...#.!..|automail|
|00005a50| 28 75 24 2c 73 24 2c 73 | 65 6e 64 24 2c 74 79 70 |(u$,s$,s|end$,typ|
|00005a60| 65 25 29 0d 23 a0 15 f4 | 20 61 75 74 6f 6d 61 69 |e%).#...| automai|
|00005a70| 6c 20 74 79 70 65 73 3a | 0d 23 aa 13 f4 20 30 20 |l types:|.#... 0 |
|00005a80| 3d 20 73 65 6e 64 20 66 | 69 6c 65 0d 23 b4 18 f4 |= send f|ile.#...|
|00005a90| 20 31 20 3d 20 72 65 74 | 75 72 6e 2d 72 65 63 65 | 1 = ret|urn-rece|
|00005aa0| 69 70 74 0d 23 be 0d ea | 66 24 2c 64 24 2c 46 25 |ipt.#...|f$,d$,F%|
|00005ab0| 0d 23 c8 31 66 24 3d a4 | 74 6d 70 66 69 6c 65 3a |.#.1f$=.|tmpfile:|
|00005ac0| 64 24 3d 66 72 6f 6d 24 | 3a e7 72 65 70 6c 79 74 |d$=from$|:.replyt|
|00005ad0| 6f 24 3e 22 22 8c 64 24 | 3d 72 65 70 6c 79 74 6f |o$>"".d$|=replyto|
|00005ae0| 24 0d 23 d2 24 e7 74 79 | 70 65 25 3d 31 80 72 65 |$.#.$.ty|pe%=1.re|
|00005af0| 63 65 69 70 74 24 3e 22 | 22 8c 64 24 3d 72 65 63 |ceipt$>"|".d$=rec|
|00005b00| 65 69 70 74 24 0d 23 dc | 0b e7 64 24 3e 22 22 8c |eipt$.#.|..d$>"".|
|00005b10| 0d 23 e6 16 20 20 66 31 | 25 3d a4 6f 70 65 6e 6f |.#.. f1|%=.openo|
|00005b20| 75 74 28 66 24 29 0d 23 | f0 0d 20 20 e7 66 31 25 |ut(f$).#|.. .f1%|
|00005b30| 3e 30 8c 0d 23 fa 17 20 | 20 20 20 d5 23 66 31 25 |>0..#.. | .#f1%|
|00005b40| 2c 22 54 6f 3a 20 22 2b | 64 24 0d 24 04 27 20 20 |,"To: "+|d$.$.' |
|00005b50| 20 20 d5 23 66 31 25 2c | 22 46 72 6f 6d 3a 20 22 | .#f1%,|"From: "|
|00005b60| 2b 75 24 2b 22 40 22 2b | 6d 61 69 6c 6e 61 6d 65 |+u$+"@"+|mailname|
|00005b70| 24 0d 24 0e 1c 20 20 20 | 20 d5 23 66 31 25 2c 22 |$.$.. | .#f1%,"|
|00005b80| 53 75 62 6a 65 63 74 3a | 20 22 2b 73 24 0d 24 18 |Subject:| "+s$.$.|
|00005b90| 19 20 20 20 20 f2 61 75 | 74 6f 68 65 61 64 65 72 |. .au|toheader|
|00005ba0| 73 28 66 31 25 29 0d 24 | 22 10 20 20 20 20 c8 8e |s(f1%).$|". ..|
|00005bb0| 74 79 70 65 25 ca 0d 24 | 2c 27 20 20 20 20 20 20 |type%..$|,' |
|00005bc0| c9 30 3a c8 95 73 65 6e | 64 24 3e 22 22 3a 64 24 |.0:..sen|d$>"":d$|
|00005bd0| 3d a4 73 70 61 72 28 73 | 65 6e 64 24 29 0d 24 36 |=.spar(s|end$).$6|
|00005be0| 3d 20 20 20 20 20 20 20 | 20 20 20 66 32 25 3d a4 |= | f2%=.|
|00005bf0| 6f 70 65 6e 69 6e 28 64 | 24 29 3a e7 66 32 25 3e |openin(d|$):.f2%>|
|00005c00| 30 8c f2 66 63 6f 70 79 | 28 66 32 25 2c 66 31 25 |0..fcopy|(f2%,f1%|
|00005c10| 29 3a f2 63 66 28 66 32 | 25 29 0d 24 40 22 20 20 |):.cf(f2|%).$@" |
|00005c20| 20 20 20 20 20 20 20 20 | e7 73 65 6e 64 24 3e 22 | |.send$>"|
|00005c30| 22 8c d5 23 66 31 25 2c | 22 2d 2d 22 0d 24 4a 0d |"..#f1%,|"--".$J.|
|00005c40| 20 20 20 20 20 20 20 20 | ce 0d 24 54 0d 20 20 20 | |..$T. |
|00005c50| 20 20 20 c9 31 3a 0d 24 | 5e 35 20 20 20 20 20 20 | .1:.$|^5 |
|00005c60| 20 20 d5 23 66 31 25 2c | 22 4d 65 73 73 61 67 65 | .#f1%,|"Message|
|00005c70| 20 22 2b 6d 65 73 73 69 | 64 24 2b 22 20 74 6f 20 | "+messi|d$+" to |
|00005c80| 22 2b c0 74 6f 24 2c 31 | 35 30 29 0d 24 68 3b 20 |"+.to$,1|50).$h; |
|00005c90| 20 20 20 20 20 20 20 e7 | 73 75 62 6a 65 63 74 24 | .|subject$|
|00005ca0| 3e 22 22 8c d5 23 66 31 | 25 2c 22 63 6f 6e 63 65 |>""..#f1|%,"conce|
|00005cb0| 72 6e 69 6e 67 20 22 2b | c0 73 75 62 6a 65 63 74 |rning "+|.subject|
|00005cc0| 24 2c 32 30 30 29 0d 24 | 72 2e 20 20 20 20 20 20 |$,200).$|r. |
|00005cd0| 20 20 d5 23 66 31 25 2c | 22 77 61 73 20 72 65 63 | .#f1%,|"was rec|
|00005ce0| 65 69 76 65 64 20 61 74 | 20 22 2b 68 6f 73 74 6e |eived at| "+hostn|
|00005cf0| 61 6d 65 24 0d 24 7c 09 | 20 20 20 20 cb 0d 24 86 |ame$.$|.| ..$.|
|00005d00| 22 20 20 20 20 f2 63 66 | 28 66 31 25 29 3a f2 73 |" .cf|(f1%):.s|
|00005d10| 65 74 74 79 70 65 28 66 | 24 2c 26 46 46 46 29 0d |ettype(f|$,&FFF).|
|00005d20| 24 90 1b 20 20 20 20 61 | 24 3d a4 73 65 6e 64 6d |$.. a|$=.sendm|
|00005d30| 61 69 6c 28 66 24 2c 75 | 24 29 0d 24 9a 07 20 20 |ail(f$,u|$).$.. |
|00005d40| cd 0d 24 a4 15 20 20 46 | 25 3d a4 64 65 6c 66 69 |..$.. F|%=.delfi|
|00005d50| 6c 65 28 66 24 29 0d 24 | ae 05 cd 0d 24 b8 05 e1 |le(f$).$|....$...|
|00005d60| 0d 24 c2 04 0d 24 cc 13 | dd f2 72 65 74 75 72 6e |.$...$..|..return|
|00005d70| 72 65 63 65 69 70 74 0d | 24 d6 10 ea 66 24 2c 61 |receipt.|$...f$,a|
|00005d80| 24 2c 73 24 2c 46 25 0d | 24 e0 41 e7 64 6f 72 65 |$,s$,F%.|$.A.dore|
|00005d90| 63 65 69 70 74 25 3c 3e | 30 80 a7 70 72 65 63 65 |ceipt%<>|0..prece|
|00005da0| 64 65 6e 63 65 24 2c 22 | 62 75 6c 6b 22 29 3d 30 |dence$,"|bulk")=0|
|00005db0| 80 a7 70 72 65 63 65 64 | 65 6e 63 65 24 2c 22 6a |..preced|ence$,"j|
|00005dc0| 75 6e 6b 22 29 3d 30 8c | 0d 24 ea 40 20 20 f2 61 |unk")=0.|.$.@ .a|
|00005dd0| 75 74 6f 6d 61 69 6c 28 | 6d 61 69 6c 75 73 65 72 |utomail(|mailuser|
|00005de0| 24 2c 22 41 63 6b 6e 6f | 77 6c 65 64 67 65 6d 65 |$,"Ackno|wledgeme|
|00005df0| 6e 74 20 6f 66 20 72 65 | 63 65 69 70 74 20 22 2b |nt of re|ceipt "+|
|00005e00| 73 24 2c 22 22 2c 31 29 | 0d 24 f4 05 cd 0d 24 fe |s$,"",1)|.$....$.|
|00005e10| 05 e1 0d 25 08 04 0d 25 | 12 17 dd f2 61 75 74 6f |...%...%|....auto|
|00005e20| 68 65 61 64 65 72 73 28 | 6f 75 74 25 29 0d 25 1c |headers(|out%).%.|
|00005e30| 35 d5 23 6f 75 74 25 2c | 22 4d 65 73 73 61 67 65 |5.#out%,|"Message|
|00005e40| 2d 49 44 3a 20 3c 22 2b | a4 69 64 5f 64 61 74 65 |-ID: <"+|.id_date|
|00005e50| 2b 22 40 22 2b a4 66 75 | 6c 6c 6e 61 6d 65 2b 22 |+"@"+.fu|llname+"|
|00005e60| 3e 22 0d 25 26 1d d5 23 | 6f 75 74 25 2c 22 44 61 |>".%&..#|out%,"Da|
|00005e70| 74 65 3a 20 22 2b a4 72 | 66 63 5f 64 61 74 65 0d |te: "+.r|fc_date.|
|00005e80| 25 30 1d d5 23 6f 75 74 | 25 2c 22 50 72 65 63 65 |%0..#out|%,"Prece|
|00005e90| 64 65 6e 63 65 3a 20 62 | 75 6c 6b 22 0d 25 3a 32 |dence: b|ulk".%:2|
|00005ea0| d5 23 6f 75 74 25 2c 22 | 58 2d 4d 61 69 6c 65 72 |.#out%,"|X-Mailer|
|00005eb0| 3a 20 52 49 53 43 20 4f | 53 20 4e 65 77 73 62 61 |: RISC O|S Newsba|
|00005ec0| 73 65 20 22 2b 76 65 72 | 24 2b 72 65 76 24 0d 25 |se "+ver|$+rev$.%|
|00005ed0| 44 0d d5 23 6f 75 74 25 | 2c 22 22 0d 25 4e 05 e1 |D..#out%|,"".%N..|
|00005ee0| 0d 25 58 04 0d 25 62 14 | dd f2 61 72 74 73 61 76 |.%X..%b.|..artsav|
|00005ef0| 65 28 67 25 2c 73 25 29 | 0d 25 6c 19 ea 67 24 2c |e(g%,s%)|.%l..g$,|
|00005f00| 73 24 2c 6f 75 74 64 24 | 2c 6f 75 74 66 24 2c 46 |s$,outd$|,outf$,F|
|00005f10| 25 0d 25 76 37 e7 73 75 | 70 65 72 73 65 64 65 24 |%.%v7.su|persede$|
|00005f20| 3e 22 22 80 61 70 70 72 | 6f 76 65 64 24 3e 22 22 |>"".appr|oved$>""|
|00005f30| f2 64 65 6c 65 74 65 69 | 64 28 67 25 2c 73 75 70 |.deletei|d(g%,sup|
|00005f40| 65 72 73 65 64 65 24 29 | 0d 25 80 34 e7 63 6f 6e |ersede$)|.%.4.con|
|00005f50| 74 72 6f 6c 24 3e 22 22 | 80 61 70 70 72 6f 76 65 |trol$>""|.approve|
|00005f60| 64 24 3e 22 22 f2 64 6f | 63 6f 6e 74 72 6f 6c 28 |d$>"".do|control(|
|00005f70| 67 25 2c 63 6f 6e 74 72 | 6f 6c 24 29 0d 25 8a 4c |g%,contr|ol$).%.L|
|00005f80| f4 20 74 72 79 20 61 20 | 66 61 73 74 20 73 61 76 |. try a |fast sav|
|00005f90| 65 20 6f 70 65 72 61 74 | 69 6f 6e 20 66 69 72 73 |e operat|ion firs|
|00005fa0| 74 20 28 6d 6f 72 65 20 | 63 6c 65 76 65 72 20 72 |t (more |clever r|
|00005fb0| 6f 75 74 69 6e 65 20 69 | 66 20 74 68 69 73 20 66 |outine i|f this f|
|00005fc0| 61 69 6c 73 2e 2e 2e 29 | 0d 25 94 4f 67 24 3d 67 |ails...)|.%.Og$=g|
|00005fd0| 72 70 24 28 67 25 29 3a | 73 24 3d a4 73 65 71 73 |rp$(g%):|s$=.seqs|
|00005fe0| 74 72 28 73 25 29 3a 6f | 75 74 66 24 3d a4 67 70 |tr(s%):o|utf$=.gp|
|00005ff0| 61 74 68 28 67 72 70 24 | 28 67 25 29 29 2b 22 2e |ath(grp$|(g%))+".|
|00006000| 7e 78 2e 22 2b a4 61 72 | 74 64 69 72 28 73 25 29 |~x."+.ar|tdir(s%)|
|00006010| 2b 22 2e 22 2b 73 24 0d | 25 9e 3a c8 99 22 58 4f |+"."+s$.|%.:.."XO|
|00006020| 53 5f 46 69 6c 65 22 2c | 31 30 2c 6f 75 74 66 24 |S_File",|10,outf$|
|00006030| 2c 26 46 46 46 2c 2c 61 | 72 74 62 61 73 65 25 2c |,&FFF,,a|rtbase%,|
|00006040| 61 72 74 62 61 73 65 25 | 2b 70 74 72 25 b8 3b 46 |artbase%|+ptr%.;F|
|00006050| 25 0d 25 a8 2a e7 28 46 | 25 80 31 29 8c 6f 75 74 |%.%.*.(F|%.1).out|
|00006060| 66 24 3d a4 61 72 74 69 | 63 6c 65 6f 70 28 67 25 |f$=.arti|cleop(g%|
|00006070| 2c 73 24 2c 30 2c 22 22 | 2c 30 29 0d 25 b2 0e e7 |,s$,0,""|,0).%...|
|00006080| 6f 75 74 66 24 3e 22 22 | 8c 0d 25 bc 4a 20 20 f2 |outf$>""|..%.J .|
|00006090| 6e 62 75 70 64 61 74 65 | 32 28 67 24 2c 73 25 2c |nbupdate|2(g$,s%,|
|000060a0| 61 72 74 64 61 74 65 25 | 2c 66 72 6f 6d 24 2c 73 |artdate%|,from$,s|
|000060b0| 75 62 6a 65 63 74 24 2c | 6d 65 73 73 69 64 24 29 |ubject$,|messid$)|
|000060c0| 3a f2 61 64 64 74 6f 69 | 6e 64 65 78 28 67 25 2c |:.addtoi|ndex(g%,|
|000060d0| 73 25 29 0d 25 c6 36 20 | 20 e7 65 78 70 69 72 65 |s%).%.6 | .expire|
|000060e0| 73 25 3e 30 80 69 67 65 | 78 70 25 3d 30 8c f2 73 |s%>0.ige|xp%=0..s|
|000060f0| 65 74 66 69 6c 65 65 78 | 70 28 6f 75 74 66 24 2c |etfileex|p(outf$,|
|00006100| 65 78 70 69 72 65 73 25 | 29 0d 25 d0 2e 20 20 f2 |expires%|).%.. .|
|00006110| 70 72 69 6e 74 28 22 22 | 2c 67 24 2b 22 2e 22 2b |print(""|,g$+"."+|
|00006120| 73 24 2c 22 22 2c 22 22 | 29 3a f2 70 6f 6c 6c 28 |s$,"",""|):.poll(|
|00006130| 73 6c 69 63 65 25 29 0d | 25 da 07 20 20 cc 0d 25 |slice%).|%.. ..%|
|00006140| e4 2b 20 20 f2 6d 65 73 | 73 61 67 65 28 a4 6d 73 |.+ .mes|sage(.ms|
|00006150| 67 32 28 22 44 73 61 76 | 65 66 61 69 6c 22 2c c3 |g2("Dsav|efail",.|
|00006160| 73 25 2c 67 24 29 2c 31 | 29 0d 25 ee 30 20 20 f2 |s%,g$),1|).%.0 .|
|00006170| 6c 6f 67 28 22 44 65 62 | 61 74 63 68 20 73 61 76 |log("Deb|atch sav|
|00006180| 65 20 66 61 69 6c 75 72 | 65 3a 20 22 2b 67 24 2b |e failur|e: "+g$+|
|00006190| 22 20 23 22 2b c3 73 25 | 29 0d 25 f8 05 cd 0d 26 |" #"+.s%|).%....&|
|000061a0| 02 05 e1 0d 26 0c 04 0d | 26 16 17 dd f2 77 72 69 |....&...|&....wri|
|000061b0| 74 65 5f 72 65 63 66 69 | 6c 65 28 66 24 29 0d 26 |te_recfi|le(f$).&|
|000061c0| 20 0f e7 72 65 63 70 6f | 73 25 3e 30 8c 0d 26 2a | ..recpo|s%>0..&*|
|000061d0| 27 20 20 66 30 25 3d a4 | 6f 70 65 6e 6f 75 74 28 |' f0%=.|openout(|
|000061e0| 62 61 73 65 64 69 72 24 | 2b 22 2e 72 65 63 6f 76 |basedir$|+".recov|
|000061f0| 65 72 22 29 0d 26 34 0d | 20 20 e7 66 30 25 3e 30 |er").&4.| .f0%>0|
|00006200| 8c 0d 26 3e 10 20 20 20 | 20 d5 23 66 30 25 2c 66 |..&>. | .#f0%,f|
|00006210| 24 0d 26 48 13 20 20 20 | 20 d5 23 66 30 25 2c c3 |$.&H. | .#f0%,.|
|00006220| 6c 65 6e 25 0d 26 52 16 | 20 20 20 20 d5 23 66 30 |len%.&R.| .#f0|
|00006230| 25 2c c3 72 65 63 70 6f | 73 25 0d 26 5c 33 20 20 |%,.recpo|s%.&\3 |
|00006240| 20 20 f2 63 66 28 66 30 | 25 29 3a f2 73 65 74 74 | .cf(f0|%):.sett|
|00006250| 79 70 65 28 62 61 73 65 | 64 69 72 24 2b 22 2e 72 |ype(base|dir$+".r|
|00006260| 65 63 6f 76 65 72 22 2c | 26 46 46 46 29 0d 26 66 |ecover",|&FFF).&f|
|00006270| 15 20 20 20 20 f2 77 72 | 69 74 65 67 72 70 64 61 |. .wr|itegrpda|
|00006280| 74 61 0d 26 70 07 20 20 | cd 0d 26 7a 05 cd 0d 26 |ta.&p. |..&z...&|
|00006290| 84 05 e1 0d 26 8e 04 0d | 26 98 11 dd f2 64 65 6c |....&...|&....del|
|000062a0| 5f 72 65 63 66 69 6c 65 | 0d 26 a2 28 ea 46 25 3a |_recfile|.&.(.F%:|
|000062b0| 46 25 3d a4 64 65 6c 66 | 69 6c 65 28 62 61 73 65 |F%=.delf|ile(base|
|000062c0| 64 69 72 24 2b 22 2e 72 | 65 63 6f 76 65 72 22 29 |dir$+".r|ecover")|
|000062d0| 0d 26 ac 05 e1 0d 26 b6 | 04 0d 26 c0 19 dd a4 63 |.&....&.|..&....c|
|000062e0| 68 65 63 6b 5f 72 65 63 | 66 69 6c 65 28 f8 20 70 |heck_rec|file(. p|
|000062f0| 25 29 0d 26 ca 11 ea 66 | 24 2c 66 32 24 2c 6c 25 |%).&...f|$,f2$,l%|
|00006300| 2c 6d 24 0d 26 d4 24 66 | 30 25 3d a4 6f 70 65 6e |,m$.&.$f|0%=.open|
|00006310| 69 6e 28 62 61 73 65 64 | 69 72 24 2b 22 2e 72 65 |in(based|ir$+".re|
|00006320| 63 6f 76 65 72 22 29 0d | 26 de 0b e7 66 30 25 3e |cover").|&...f0%>|
|00006330| 30 8c 0d 26 e8 0e 20 20 | 66 24 3d be 23 66 30 25 |0..&.. |f$=.#f0%|
|00006340| 0d 26 f2 0f 20 20 6c 25 | 3d bb be 23 66 30 25 0d |.&.. l%|=..#f0%.|
|00006350| 26 fc 0f 20 20 70 25 3d | bb be 23 66 30 25 0d 27 |&.. p%=|..#f0%.'|
|00006360| 06 0e 20 20 f2 63 66 28 | 66 30 25 29 0d 27 10 19 |.. .cf(|f0%).'..|
|00006370| 20 20 66 32 24 3d 77 6f | 72 6b 64 69 72 24 2b 22 | f2$=wo|rkdir$+"|
|00006380| 2e 22 2b 66 24 0d 27 1a | 2f 20 20 e7 a4 6f 62 6a |."+f$.'.|/ ..obj|
|00006390| 74 79 70 65 28 66 32 24 | 29 3d 31 80 a4 66 69 6c |type(f2$|)=1..fil|
|000063a0| 65 73 69 7a 65 28 66 32 | 24 29 3d 6c 25 80 70 25 |esize(f2|$)=l%.p%|
|000063b0| 3c 6c 25 8c 0d 27 24 23 | 20 20 20 20 6d 24 3d a4 |<l%..'$#| m$=.|
|000063c0| 6d 73 67 32 28 22 44 72 | 65 63 6f 76 65 72 22 2c |msg2("Dr|ecover",|
|000063d0| 66 24 2c c3 70 25 29 0d | 27 2e 28 20 20 20 20 f2 |f$,.p%).|'.( .|
|000063e0| 6d 65 73 73 61 67 65 28 | 6d 24 2c 30 29 3a f2 70 |message(|m$,0):.p|
|000063f0| 6f 6c 6c 28 30 29 3a f2 | 6c 6f 67 28 6d 24 29 0d |oll(0):.|log(m$).|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
